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Preface 

This publication describes two separate but similar 
packages of disk-file organization routines. Each pack- 
age consists of a prephase and a set of library routines 
from which two complete sets of object programs can 
be generated. One of the two sets of object programs 
is designed to load and maintain a random file using 
the chaining method, whereby a record is loaded into 
a disk location determined by the control data of the 
record. The other set of object programs loads and 
maintains a file of records in sequential order. In this 
case, a sequenced file is loaded into consecutive disk 
locations. A sequence link field is used to accommodate 
additions to and deletions from the file. Also, an index 
is built to facilitate random retrieval of records in the 
sequential file. 

These file-organization routines are suppHed by ibm 
in Autocoder Hbrary format. From these Hbrary rou- 
tines, the macro generator portion of Autocoder gen- 
erates object programs to be used in organizing and 
maintaining disk files. The object programs are gen- 
erated in accordance with a series of parameter cards 
punched by the user and are tailored, by these param- 
eters, to the user's particular apphcation. 
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Machine Requirements 

IBM 1401-1460 Disk File Organization Routines 

To Generate Object Programs. These routines are en- 
tered in the Ubrary portion of the ibm 1401-1440- 
1460 Disk Autocoder. This Autocoder can be op- 
erated from either 1311 or 1301 disk storage. The 
machine requirements to generate file-organization 
object programs are the same as for any 1401 or 
1460 disk Autocoder run. See the pubHcation Auto- 
coder (on Disk) Program: Specifications and Operat- 
ing Procedures, C24-3259. 

To Run Object Programs. 

IBM 1401 Processing Unit with 4,000 core-storage 
positions or, 

IBM 1441 Processing Unit with 8,000 core-storage 
positions. 

The high-low-equal compare feature is required. 
Additional core storage can be utilized for longer rec- 
ord and block lengths. The advanced-programming 
(1401) or indexing-and-store-address-register (1460) 
feature is not required but, if available, is utilized for 
faster, more efficient programming. 

IBM 1402 Card Read Punch. 

IBM 1403 Printer, Model 1, 2, or 3. If the console 
printer is available, the 1403 is used only for the 
optional audit trail printouts. 

IBM 1407 Console Inquiry Station or, 

IBM 1447 Console (without the buflEer feature). 
The console printer is not required. If available, 
however, it is used to print all status and error mes- 
sages, leaving the ibm 1403 Printer for only the 
(optional) audit trail printouts. A 1447 with the 
buflfer feature cannot be used. 

IBM 1301 Disk Storage, Model 11, 12, 21, or 22, or 
IBM 1311 Disk Storage Drive, Model 1 or 2. These 
programs can be generated in either 1311 or 1301 
disk storage for systems with either or both 1311 or 
1301 disk storage. The 1311 direct-seek feature is 
not required but is utilized if available. 

IBM 729 or 7330 Magnetic Tape Unit. Required 
only if tape input or output is requested. 



IBM 1440 Disk File Organization Routines 

To Generate Object Programs. These routines are en- 
tered in the library portion of the ibm 1401-1440- 
1460 Disk Autocoder. This Autocoder can be op- 
erated from either 1311 or 1301 disk storage. The 
machine requirements to generate file-organization 
object programs are the same as for any 1440 disk 
Autocoder run. See the publication Autocoder (on 
disk) Program Specifications and Operating Proce- 
dures, C24-3259. 

To Run Object Programs. 

IBM 1441 Processing Unit. When operating on ibm 
1311 Disk Storage Drives, 4,000 core-storage posi- 
tions are required. When operating on ibm 1301 
Disk Storage, 8,000 positions are required. Addi- 
tional core storage can be utilized for longer record 
and block lengths. The indexing-and-store-address- 
register feature is not required but is utilized if 
available. 

IBM Card Read Punch, Model 1 or 2, or 
IBM 1442 Card Reader, Model 4. The selective- 
stacker feature (Model 1 only) is not required but 
can be used to separate-out mispunched cards when 
punching. 

IBM 1444 Card Punch, Model 1. Required only if 
punched output is requested on a system with only 
a Model 4 of the 1442. 

IBM 1443 Printer, Model 1 or 2. If the console 
printer is available, the 1443 is used only for the 
optional audit trail printouts. 

IBM 1447 Console (without the buffer feature). 
The console printer is not required. If available, 
however, it is used to print all status and error mes- 
sages, leaving the ebm 1443 Printer for only the 
(optional) audit trail printouts. A 1447 with the 
buffer feature cannot be used. 

IBM 1301 Disk Storage, Model 11, 12, 21, or 22, or 

IBM 1311 Disk Storage Drive, Model 1 or 2. These 
programs can be generated in either 1311 or 1301 
disk storage for systems with either or both 1311 
or 1301 disk storage. The 1311 direct-seek feature is 
not required but is utilized if available. 

IBM 7335 Magnetic Tape Unit. Required only if 
tape input or output is requested. 



General Considerations of 
Disk-File Organization 

There are many advantages to random-access storage 
in a data processing system. The jbm 1311 Disk Stor- 
age Drive and the ibm 1301 Disk Storage have greatly 
increased these advantages. The flexibihty of these 
units allows several kinds of processing within the 
same system. The advantages oflPered by one kind of 
processing are often quite diflFerent from those oflFered 
by another. For example, in a random-processing ap- 
pHcation, the advantages center around the abihty to 
process only those records that have current trans- 
actions, rather than to process all of a file. In a second 
case, the advantage may be the ability to process one 
or more sequential files against a single sequenced 
input. 

File organization is the key to effective use of disk 
storage. The objective of disk-file organization is the 
systematic storing of information in disk storage in 
such a manner that records can be retrieved in the 
quickest way possible, while still maintaining the over- 
all processing objectives of the system. 

The method of organization best suited to a par- 
ticular file of disk records depends upon many factors. 
These factors must be analyzed for each file in any one 
particular application. Often, more than one organiza- 
tion scheme can be used on the same file. In one 
application, records could be processed purely at ran- 
dom; in another, the same records could be processed 
in sequence by various control fields. For example, 
records within a file might be processed at random 



during an updating run and sequentially within cer- 
tain groups, such as branch oflBce or due date, when 
producing reports or billing. A file such as this would 
be analyzed to determine whether it should be organ- 
ized: 

1. Purely randomly, thus keeping process time at a 
minimum during one run but destroying the ad- 
vantage of the sequential nature of the other. 

2. Sequentially, thus minimizing the time required to 
produce reports but increasing updating time. 

3. Randomly for updating and then sorted into se- 
quence for reports. 

The decision would depend on the nature of the file. 
Questions such as the following might be asked: 

1. Can transactions be batched and sorted before 
processing, or must they be processed as they occur? 

2. Is the activity distributed throughout the file in 
such a manner as to warrant passing the entire file 
when updating? 

3. Would the processing time saved by sorting warrant 
the time and effort required? 

Questions of this kind must be asked of each file in 
an installation. In choosing organization methods, the 
over-all processing objectives of the system must be 
kept in mind at all times. 
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Random Files 



Direct Addressing 

The simplest method of file organization is that in 
which a unique disk address is obtained from the con- 
trol data of each record. This is referred to as the direct 
addressing method. Consider this case as an example: 
A particular file consists of 10,000 records, each 100 
characters long. No records are ever added to or de- 
leted from the file. Each record has a unique 6-digit 
control field ranging from 000000 to 009999, inclusive. 
Further, this file is always processed in one of two 
ways: 

1. Either purely randomly, with no predeterminable 
sequence, or 

2. Purely sequentially by the 6-digit control fields. 

In this hypothetical case there is one logical method 
of disk-storage organization. Record 000000 is stored in 
sector 000000; record 000001 in sector 000001; and so 
on, to record 009999 which is stored in sector 009999. 

No elaborate file-organization program could pos- 
sibly improve the organization of this file. When proc- 
essing randomly, any record can be found with a 
single seek. When it is possible to process sequentially, 
only one seek is needed per cylinder. Processing time 
is thus at an absolute minimum. Also, the file area is 
packed 100% . No disk-storage space is lost. However, 
this was given as the optimum case, and it rarely oc- 
curs in actual practice. 

In practice, the control data (item number, account 
number, etc.) of a file of records can seldom be used 
directly as disk addresses. Even when in the proper 
form, they do not always fall within the range of ad- 
dresses desired. However, it may still be possible to 
use direct addressing. For example, suppose the rec- 
ords in the previously described file were 200 charac- 
ters long. Thus each record would require two sectors. 
Unique disk addresses could be assigned to these rec- 
ords by multiplying the control data of each record by 
2 and then adding a constant to arrive at addresses 
within the desired portion of the disk pack. 

If these records were 25 characters long, and it were 
desired to use single-sector blocks with four records 
per block, each control field could be divided by four. 
The remainder of the division could be used to indi- 
cate the individual record position within the block. 

If the file has no control fields that can be used di- 
rectly as disk addresses, it is sometimes possible to 
pre-assign addresses. For example, the item number 



4709GPX could become 4709GPX-023456, where 023- 
456 is the disk address of the record. 



Indirect Addressing 

Where none of the preceding methods are possible, it 
may be desirable to use a conversion routine to operate 
on the existing control data to produce disk addresses 
within the desired range. If the conversion routine 
used on a file produces a unique disk address for each 
record, direct addressing can be used. However, in 
most cases, using a conversion routine results in assign- 
ing some disk addresses to more than one record. 
Such duplicate disk addresses are called synonyms. 

There are several ways of organizing files with syno- 
nyms. The method that has been determined most efiB- 
cient in the majority of cases is that called the chaining 
method. This is the method used by the random disk- 
file organization routines described in this bulletin. 

The objective sought by a conversion routine is to 
convert the control data of the records in a file to a 
randomly distributed series of disk addresses within a 
desired range, and to do this with a minimum number 
of synonyms. It is not possible to specify any one 
method of making this conversion. Each situation must 
be studied individually to determine the best method. 



Chaining 

The file organization technique used with a file employ- 
ing indirect addressing must be able to accommodate 
the synonyms or duplicate addresses produced. The 
term chaining is applied to a technique that has been 
found to be most eflBcient in a majority of cases. Chain- 
ing is particularly suited for use in 1311 and 1301 disk 
storage because successive links of a chain of syno- 
nyms can be read without reseeking. 

As each record is read in to be loaded in disk 
storage, its control data is converted to a disk address. 
These converted addresses are called home addresses. 
Because only one record can be stored in each location, 
the first synonym (home record) is placed in the origi- 
nal address developed (home address). The additional 
record or records (non-homes) are stored in overflow 
locations. The address of the first overflow location is 
stored in the home-address location. The address of 
the second overflow location is stored in the first 
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Figure 1. Disk-Storage Chaining 



overflow location, etc. Chaining requires that, in the 
home address and all overflow locations, space be re- 
served for the address of the next location or link in 
the chain (Figure 1). 

A chained file is normally loaded in two passes. Dur- 
ing the first pass, only those records that can be placed 
in home locations are loaded. The second pass places 
all of the remaining records in overflow locations. 
Each overflow record is placed in an available loca- 
tion as close as possible to the previous link in the 
chain. 

Retrieval of a record is accomplished by converting 
the control data to the home address. The record in 
the home-address location is read into core storage, 
and its control data is compared to that of the record 
being sought. If the control fields are not equal, the 
address of the first overflow record is extracted from 
the home record and another read command is issued 
using this address. The process is repeated until the 
desired record is found. 

The time required to retrieve a particular record 
depends upon its position in a chain. All home records 
can be retrieved with a single seek and read. Subse- 
quent links of a chain may require additional reads 
and, possibly, additional seeks. 

File Packing 

The average number of reads required to retrieve a 
record from a chained file depends upon the number 
of synonyms developed by the conversion routine. The 
number of synonyms produced by a randomizing con- 
version routine can be reduced by assigning more disk- 
storage space than actually required by the file. The 
percentage of the file area actually used for records is 



called the packing factor. For example, 11,000 disk lo- 
cations might be used to store 10,000 records. Thus, 
the file would be said to be packed approximately 
90%. 

With a chained file, the average time required to 
retrieve records diminishes as the packing factor de- 
creases. However, it is impossible to state any given 
packing factor as the best for all chained files. The 
packing of an eflBciently organized file can vary from 
65% to 95% . The time required to retrieve a record is 
not the only factor by which the eflBciency of a file is 
measured. For example, a file might be packed close 
to 100% if by so doing the entire file can be kept 
within one disk pack. On the other hand, a file might 
be packed very loosely if it is desired to keep only one 
file or one group of related files on a single pack. An- 
other point to consider is anticipated growth. Room 
must be left in a file area to accommodate records 
added at a later date. 



Blocking Records in a Chained File 

Records can be blocked easily in 1311 and 1301 disk 
storage. Because a single 100-character sector is the 
smallest unit of storage that can be read or written, 
the block length must be some multiple of 100 charac- 
ters. The block length is Hmited only by the amount of 
core storage available for reading and writing the disk. 
One reason for blocking records in a chained file is 
to save storage space. For example, four 125-character 
disk records can be stored in one 5-sector block with 
no wasted space. Another reason is that the average 
number of reads required to locate a record can usu- 
ally be reduced by increasing the blocking factor 
(number of records per block). The greater the block- 
ing factor, the greater the chance that overflow records 
will be in the same block as the home record. When 
they are, no additional read is required. It should be 
remembered, however, that the longer the block length, 
the longer the time required to accomplish a single 
read operation. 

Frequency Loading 

The total time required to process a chained file can 
often be reduced by loading the most active records 
first, thus assuring their being placed in a home loca- 
tion or a prime position in a chain. It has been found 
that in many applications approximately 80% of the 
transactions apply to only 20% of the file. For exam- 
ple, out of every 100 transactions, 80 will be for the 
20% high-activity items. 

If no activity count is available when a file is initially 
loaded, it may be worthwhile to set up a field in each 



8 FUe Org. Specs. 



record to accumulate such a count. At a later date, 
the file can be sorted on this count and reloaded. 



Additions and Deletions 

Continual additions to, and deletions from, a file aflEect 
the efficiency of any organization scheme. The effect 
on a chained file, however, is comparatively slight. 
Thus, chaining is particularly suited to files with a 
very large turnover. 



6/ocfcing Records in a Sequential File 

Records in a sequential file should be blocked in such 
a way as to reduce input/output time to a minimum. 
Because there need be but one seek per cylinder, the 
objective is to reduce rotational delay time. 

As a general rule, the longer the block length, the 
shorter the read, write, write-check time per record. 
However, in some cases, the time required to process 
or update records is such that a rotation can be gained 
by using a shorter block length. 



Sequential Files 

Two hundred sectors of 1311 disk storage or 800 sec- 
tors of 1301 disk storage can be read at a single 
access-arm setting. Because of this ability, many disk 
applications can be made more efficient by organizing 
files in a sequential order rather than in random 
order. The goal in a random file is to come as close 
as possible to an average of one seek and one read 
per record. The goal in a sequential file is one seek 
per cylinder and one read per block. 

When a sequential file is being loaded, the records 
are previously sorted into sequence by control field. 
They are then read into the system and stored in con- 
secutive disk locations. To process the file, a program 
requires only the upper and lower limits of the file 
area. It begins with the first record and processes 
each record in sequence. 

Additions and Deletions 

Additions to and deletions from a sequential file can be 
handled in several ways. In some cases it is possible to 
batch additions and deletions and merge them into the 
file during a regular updating run. Another method, 
the one used in the ibm control sequential file-organi- 
zation routines, uses a sequence link. In this case, a 
field of blanks is appended to the end of each record 
as it is loaded into disk storage. Records to be added 
to the file are written into a separate area of disk stor- 
age. The address of the added record is written in the 
sequence-link field of the record that sequentially pre- 
cedes the added record. Similarly, a record can be de- 
leted and the sequence reestablished by placing the 
address of the following record in the sequence-link 
field of the preceding record. When the file is proc- 
essed, a program always checks the sequence link of 
a record. If it is blank, it reads the next consecutive 
disk location. If it contains an address, it seeks and 
reads that address. 

Additions and deletions quickly impair the efficiency 
of a sequential file. It may, therefore, be necessary to 
resequence the file often. 



Random Processing of a Sequential File 

In some applications it is desirable to process sequen- 
tial files in a random order. Because there is no neces- 
sary relationship between the control data of a record 
in a sequential file and the disk address at which it is 
located, some other kind of addressing technique must 
be used. 

The control sequential routines described in this 
bulletin use a distribution index for this purpose. The 
distribution index is a table set up during the initial 
loading of the file. It consists of the control data from 
certain records in the file and the disk addresses of 
those records. An entry can be made to the index once 
for each cylinder or once for any specified number of 
records. The distribution index is written into disk 
storage in an area specified by the user. When it is de- 
sired to locate a given record, -the index is brought to 
core storage and searched. The index does not neces- 
sarily give the exact disk address of the desired record, 
but it does establish the range within which it is lo- 
cated. For example, if an entry were made after every 
twentieth record of a file of 100-character records, the 
index would tell the track on which the record was 
located. The track could be easily searched or scanned 
for the desired record. 

The average number of seeks and reads required to 
locate a single record in a sequential file depends upon: 

1. The size of the file and the number of additions 
records. 

2. The size of the distribution index. 

3. The frequency of the entries in the index. 

The size of the distribution index depends on the 
frequency of entries and the length of the control fields 
in the records. Thus at least one seek and possibly a 
number of reads are required to locate the. proper 
portion of the index. In some cases it is practical to 
set up a short table in core storage to index the distri- 
bution index. In this way the table in core storage 
indicates the desired sector from the distribution index. 

Having found the range within which the desired 
record is located, another seek and additional reads are 
performed to locate the record. 



Random Programs 



This section describes eight programs used to load 
and maintain a random file. Each program is generated 
separately and is available from both of the file-organi- 
zation packages. The file on which these programs are 
to operate can consist of both master and trailer rec- 
ords. Master records are the basic data records in a file. 
Trailer records are considered to be extensions of mas- 
ter records. A master record can have a number of 
trailer records, but there can be no trailers without a 
master. 

Master and trailer records are loaded separately 
and into diflFerent areas of disk storage. The master 
and trailer areas must both be in the same type of disk 
storage unit. For example, if the master area is in 
1301 storage, the trailer area must be also. However, 
input and output can be on difiFerent types of disk 
units. As each trailer is loaded, its disk address is 
linked to the master. In eflFect, the linked master and 
trailer records can be considered a variable-length disk 
record. Certain processing runs may consider only the 
master records; others, only the trailers. However, 
when the entire block of information is needed, a 
program can seek the master record and then follow 
a chain of any number of trailer records associated 
with that master. 



MASTER FILE IN 1311 DISK STORAGE 
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MASTER FILE IN 1301 DISK STORAGE 

Label Checking and Tape I/O Routines (if disk labels or any tape I/O) 
-Program Overlay 

-Availability Table (always) 
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Figure 2. Work Tracks Preceding Random Master File 
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The random object programs that can be generated 
are: 

1. PASSl Loads home master records. 

2. PASS2 Loads non-home master records. 

3. RNADD Adds master records to an organized file. 

4. TRADD Loads or adds trailer records. 

5. RNDELl Deletes or tags master records and associated 

trailer records. 

6. RNDEL2 Deletes previously tagged records. 

7. TRDEL Deletes trailer records. 

8. RNUNLD Unloads a random file for reorganization. 

A complete set of random programs generated for 
a given file normally includes each of the above- 
mentioned programs and at least one additional ver- 
sion of: 

1. PASSl The first performs the initial load. 

The second reorganizes files unloaded by 
RNUNLD. 

2. PASS2 Same purpose as the two versions of PASSl. 

3. RNDELl The first deletes records. 

The second tags records. 

4. RNUNLD The first unloads master records for reorgani- 

zation. 

The second unloads trailer records for reor- 
ganization. 

Note: Additional versions of this program are 
often generated to produce stripped files to be 
processed by other programs. 



Work Tracks 

An area immediately preceding the master-file area 
must be reserved for these programs to use as work- 
ing storage. The area required may be from one to 
five tracks, depending on the amount of core storage 
in the system, the kind of disk unit being used, and 
whether disk or tape labels are used. 

Figure 2 shows the work area for both 1311 and 
1301 master files. 

1. The first one (1311) or two (1301) tracks preceding 
the master file area are used to store the availability 
table. This table stays on the track from .one run to 
the next and must not be destroyed. 

2. The next track (second on 1311 or third on 1301) 
preceding the master area is always required if the 
file is in 1301 disk storage. If the file is in 1311 disk 
storage, this track is used only in a 4K system. It is 
used for temporary storage of program overlays. 



Nothing is retained on the track from one run to 
the next; therefore, it can be used as a work area 
by other programs. 
3. The third and fourth (1311) or fourth and fifth 
(1301) tracks preceding the master area are used to 
store disk-label checking routines and tape I/O 
routines. If the programs neither process disk labels 
nor process tape input-output, these tracks need not 
be reserved. Nothing is retained on these tracks 
from one run to the next; therefore, they can be 
used as a work area by other programs. 

(PASS1) Pass-1 Random Load Program 

PASSl reads the eritire input master file and loads all 
of those records whose control data is, or converts to, 
the address of an unused disk location. Such records 
are called home records. Records with control data 
that converts to disk locations that are already oc- 
cupied are handled as non-home records; marked or 
set aside to be loaded during PASS2. If there are no 
duplicate disk addresses in the file, there are no non- 
home records. In this case, PASSl is used to load all 
records in the file including any to be added during 
subsequent runs. Therefore, PASS2 and RNADD are 
not required. 

Two PASSl object programs are normally generated 
for a given file. The first is to perform the initial load 
of the file. The second is used to reorganize files un- 
loaded by the random unload program, RNUNLD. 

Input Records 

Input to PASSl can be from cards, tape, or disk stor- 
age. The formats allowed are discussed under Input/ 
Output Files. The file should be sorted on activity, if 
such a count is available (see Frequency Loading). 



Output Records 

The format of the output master records depends on 
the number and length of the appended fields. When 
a master record is loaded into disk storage, the rou- 
tines append the following fields: 

Overflow Address Field: This field is appended to the 
end of each master record. If the master file is un- 
blocked, this is a 6-digit field. If the file is blocked, 
this is a 7-digit field. If there are no duplicate disk 
addresses, a single position is appended. This posi- 
tion contains an availability indicator. 

Trailer Address Field: If trailer records are used, each 
master record has a 7-digit field appended to the 
front of the record. After trailer records are loaded, 
this field contains the address of the first trailer 
record (if any) associated with the master record. 

Figure 3 illustrates four kinds of disk-storage 
master records showing the user's data records plus 
the combinations of appended locations as required 
by the configuration of the file. 



Conversion Routine 

The user must supply a conversion routine to be as- 
sembled along with the following random programs: 



PASSl 



PASS2 



except when reloading a file unloaded by a 
RNUNLD program generated with the oper- 
and CONADD in the typernitnld card, 
only when the nonhomes card has the oper- 
and PUNCHZONE. 



RNADD 


— always 


TRADD 


— always 


RNDELl 


— always 


RNDEL2 


— except when there are no duplicate addresses. 


TRDEL 


— always 


RNUNLD 


— only when the typernxjnld card has the 




operand CONADD. 



Always 
7.digit 




Trailer Record . 
Address P" 



User's Data Record 



Overflow 
Addre,s_5jj ^.j,g,^ ., 



User's Data Record 



unblocked, 
7-digit if 
I Overflow ^ blocked 
'I Address | 



Trailer Record . 
Address f*" 



User's Data Record 



i^ 



User's Data Record 



id^ 



Availability 
Digit 



Figure 3. Four Kinds of Disk Storage Master Records 
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The object programs extract the control data of a rec- 
ord and place it in a field labeled CONTD. The source 
statements that define this field are taken from the file- 
organization library routines. The field is the exact 
length specified for the control data. If the control 
data is broken into subfields within the records, the 
subfields are arranged (from the left* to right) in the 
order specified in the mastcontbl card. The field has 
a word mark in the high-order (left-most) position. 
This word mark must not be cleared by the user's rou- 
tine, and no other word marks can be in the field when 
control is returned to the main program. 

After placing the control data in the field labeled 
CONTD, the program branches to the first instruction 
of the user's conversion routine. This first instruction 
must be labeled CONROU. If index registers are used, 
their contents must be saved and restored before re- 
turning control to the main program. The conversion 
routine must take the control data from the field la- 
beled CONTD, develop a valid address (see Converted 
Record Addresses), and place that address in a field 
labeled CON VI. The source statements that define this 
field are also taken from the file-organization library 
routines. If the file is unblocked, this is a 6-digit field; 
if blocked, a 7-digit field. It has a word mark in the 
high-order (left-most) position. 

The last instruction of the conversion routine must 
be labeled RETUl. It returns control to the program 
by branching to START3. 

A routine must be provided even if disk addresses 
are extracted directly from the records. In this case the 
routine simply moves the address to CONVl and then 
branches to START3. 

Note. If a file extends from one disk pack to another, it is 
up to the conversion routine to avoid those addresses that would 
cause a block to overflow from one pack to another. See Cylin- 
der Overflow for special considerations of multi-pack files. 

Converfed Record Addresses 

The random routines require that the control data of 
each record be, or be converted to, the address of the 
first sector of a block. If only one record is written 
per block, these must be 6-digit disk addresses. If more 
than one record is written per block, these must be 
7-digit addresses in the form SSSSSSR. The first six 
digits are the address of the initial sector of a block 
within the file area. 

The seventh digit (R) designates the position of the 
record within the block. This number can range from 
to 9, allowing up to ten records per block. If only 
one record is written per block, this position is not 
used. If more than one record is written per block, the 
first is numbered 0; the second is numbered 1; the 
third, 2; and so on, to record 10 which is numbered 9. 
The maximum value that R is allowed to assume de- 



Record 0142000 



Sector 
014200 



Sector 
014201 



Record 1 42002 Record 1 42003 



Sector 
014202 



Sector 
014203 



Sector 
014204 



Figure 4. Four Records per Five-Sector Block 



termines the blocking factor (records per block) of 
the file. 

Figure 4 illustrates the addresses of records within 
a 5-sector block. In this example it is assumed that four 
125-character disk records are stored in each block. 
The control data of three master records converts 
to the following addresses: 0142000, 0142002, and 
0142003. 

From this example note, first of all, that these rec- 
ords are not considered synonyms. Each has a diflFerent 
units digit, thus, they are not part of the same chain. 
The relative position of each record within the block 
is represented by the digits to 9 in the units position 
of the address. The maximum value that this position 
can attain is equal to the number of records per block 
minus one. Obtaining the relative low-order core-stor- 
age address of individual records within a disk block 
in a random file is accomplished by multiplying the 
record length by R -|- 1. 

General Operation of Program 

Before loading the data records, the file area is cleared 
to blanks. The disk addresses originally in the area are 
retained, thus allowing blocks to be arranged in the 
most advantageous order. Because the original ad- 
dresses are retained, the area must already be in the 
move mode. If the user requests that terminal record 
marks be written in the area-, they are inserted at this 
time in the low-order position of every record location 
in the file area. 

Note. When additions are being made to a file of records with 
no synonyms, the clearing routine is bypassed. See discussion 
of MASTR RDLIN card under Disk RDLIN Cards. 

After each record is read and assembled for process- 
ing, the program branches to the user's conversion 
routine to develop a disk-storage address. The address 
is sought and the disk block in which the record is to 
be written is read into core storage. Once in core 
storage, the record location within the block is tested 
for availability by examining the availability indicator. 
This is the last position within the record except when 
terminal record marks are present. In this case, the 
next-to-last position is used as the availability indi- 
cator. If this position is blank, the record location is 
available. If it contains a character other than a blank, 
the location is occupied. 

If the location is available, the input record is a 
home record. To identify all home records uniquely. 
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A- and B-bits are placed in the third position of the 
overflow-address field (Figure 5). In addition to this, 
a digit 1 is placed in the availability-indicator position 
of the overflow-address field. The digit 1 is an avail- 
ability code, indicating the presence of a record. Note 
that if an overflow address is subsequently placed in 
a home record, the digit 1 is replaced by the units 
position of the overflow address. However, the A- and 
B-bits in the third position are restored, retaining the 
home-record identification. The record is then written, 
with the block, back into disk storage. 

If the availability indicator contains a character 
other than a blank, the input record is a non-home 
record. 

Non-home records are processed according to the 
operand punched in the nonhomes parameter card: 

Operand Output 

RECINWORK The entire non-home record, preceded by its 
converted address, is written in a disk work 



Availability Position: (Last Position): 
Contains a Character Other Than a 
Blank if Location Is Occupied 



A and B Bits are 

Placed in this Position when 

Records Are Tagged 



Contains A and B Bits if the Next Overflow 
Record Is in the Same Block 




Contains A and B Bits if the Next Overflow 
Record Is in the Same Cylinder (1311 only) 




Contains A and B Bits if Record 
Is a Home Record 







l__!_L 



I A 



Figure 5. Overflow-Address Field of Master Records 



RECONTAPE The entire non-home record, preceded by its 
converted address, is written on magnetic tape. 

RECINCARD The entire non-home record, preceded by its 
converted address, is punched into cards. On 
a 1440 system, this operation can be per- 
formed only on an ibm 1444 Card Punch, It 
cannot be done on an ibm 1442 Card Read- 
Punch. 

ADDINWORK If the input is from disk storage, the input 
disk addresses of non-home records, preceded 
by the converted addresses, can be written in 
a disk work area. 

lADDINCARD If the input is from disk storage, the input 
or, disk addresses of non-home records, preceded 

5ADDINCARD by the converted addresses, can be punched 
into cards. The user can specify that either one 
or five sets of addresses be punched per card. 

PUNCHZONE On a 1440 system, if card input is read on an 
IBM 1442 Card Read-Punch, a zone can be 
punched in column 9 of the last card of each 
non-home input record. 

Note. This option cannot be taken if the user 
supplies a subroutine to assemble input rec- 
ords from cards (see Card Files imder Input/ 
Output Files). 



Parameter Cards Required 



ROUTINE 

SYSTEMSPEc (optional*) 

DISKDMVES 

EXITS (optional*) 

TYPEINPUT 
TYPERNTLTNLD 

(if reorganized) 

nSfPUTMEDIA 
INPMASTREC 



mastcontrl 
addressing 
mastbixx:k 
mastlimits 
NONHOMES (if duplicate 

addressing) 
LOADAUDir (optional*) 
inlabels (if disk input) 
oxttlabels 



* See Parameter Cards to find out when this card can be omitted 
from the source deck. 



The user must supply his symbohc conversion rou- 
tine, unless PASSl is being used to load a reorganized 
file with the converted addresses appended to the 
records. 



(PASS2) Pass-Two Random-Load Program 

This program loads all non-home master records in a 
file. The input can be in any one of the four forms de- 
scribed for non-home output under PASSl. 

If the input to PASSl was from an ibm 1442 
Card Read-Punch and if the PUNCHZONE option 
was taken in the nonhomes card, all the original data 
cards are read, including those processed as home rec- 
ords during PASSl. Column 9 of the last card of each 
record is checked to see whether it contains a zone 
punch. If no zone is detected, the record was loaded 
as a home during PASSl and is bypassed. If column 9 
has a zone punch, the record must be chained. The 
program then branches to the user's conversion routine 
for the converted disk address. 

If any of the other options were taken in the non- 
homes card, the input includes the converted address. 
The conversion routiiie is therefore not required in 
these cases. 

The converted disk address is sought and read. Dur- 
ing this pass, all home addresses are occupied. Each 
link of the existing chain is searched until the last link 
of the chain is reached. This last record is used as a 
base record in searching for an available location. The 
non-home record is placed in an available location as 
near as possible to the base record. 
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In both 1311 and 1301 disk storage, if the record is 
written in the same block as the base record, its actual 
disk address is written in the overflow-address field 
of the base record with A- and B-bits placed over the 
fourth and fifth digits. 

In 1311 disk storage A- and B-bits are placed over 
the fourth digit only, if the record is written in the 
same cylinder but not in the same block as the base 
record (Figure 5). 

If the entire cylinder containing the base record is 
filled, an available location must be found in another 
cyhnder. The cylinder that is searched depends on the 
machine configuration. 

The record is placed in a cylinder as close as pos- 
sible to that containing the base record (the last link of 
the chain) if: 

1. the master-file area is in 1301 disk storage, or 

2. the master-file area is in 1311 disk storage and the 
system has both- 

a. the direct-seek feature, and 

b. more than 4,000 core-storage positions. 

The record is placed in a cylinder as close as pos- 
sible to cylinder 00 in the disk pack that contains the 
upper limit if: 

1. the master-file area is in 1311 disk storage and the 
system has either- 

a. fewer than 8,000 core-storage positions, or 

b. no direct-seek feature. 

Parameter Cards Required 

With the exception of the routine card, the same 
cards used in generating PASSl must be used for this 
program also. All the operands must be the same, with 
the exception, perhaps, of the inputmedia card. The 
iNPUTMEDiA card must be changed if the non-home 
records were written on tape in PASSl, (See INPUT- 
MEDIA Card). 

The conversion routine is supplied only if the 
PUNCHZONE option was taken in the nonhomes 
card. 



or tape input blocks need not be the same length nor 
have the same number of records per block as the 
original input file. 

After a record to be added is assembled for process- 
ing, the program branches to the user's conversion rou- 
tine for a disk-storage address. The address is sought 
and the disk block is read into core storage. The ad- 
dress to which the control data converted can be: 

1. an unoccupied location 

2. the home address of an existing chain 

3. a location occupied by the second, third, etc., link of 
a chain. 

When the control data of a record converts to an 
unoccupied location, the record is considered a home 
record and is processed as in PASSl. 

When the control data of a record converts to the 
home address of an existing chain, RNADD adds the 
record to this chain by placing it in an available loca- 
tion near the last link of the chain. This is done as 
in PASS2. 

If, however, the control data of a record converts 
to the address of a location occupied by the second, 
third, or higher link of an existing chain, the record 
contained in the link is removed and placed in another 
available location. The overflow-address field of the 
preceding link of the chain is modified to contain the 
new address of the displaced record. The new record 
is then written as a home record in the address to 
which its control data converted. 

For example, in Figure 6, locations 0072010, 0072101, 

0072620, 0072621, and 0072800 constitute the original 
chain. The record to be added converts to address 

0072621, which is occupied by the fourth link of the 
chain. To place the new record in its proper location, 
the record in location 0072621 is moved to 0072740 
and the overflow address in record 0072620 is changed 
to 0072740. 



Parameter Cards Required 



(RNADD) Additions Program 
for Master Records 

This program adds master records to an organized 
random file. Input can be from cards, disk, or tape. 
The specifications of the records added must be the 
same as those for the initial loading, but the input 
media need not be the same as for the initially loaded 
file. For example, the original file could have been 
loaded from disk, and the additions, from cards. Disk 



ROtrriNE 

SYSTEMSPEC (optional*) 

DISKDRTVES 

EXITS (optional*) 

INPtJTMEDIA 
INPMASTREC 
MASTCONTRL 



ADDRESSING 
MASTBLOCK 
MASTLIMITS 

LOADAUDiT (optional*) 
iNLABELS (if disk input) 

OtTTLABELS 



* See Parameter Cards to find out when this card should be 
omitted from the source deck. 

The user must supply the symbolic conversion routine 
when generating this program. 
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0072010 (Home Address) 




072800 



Figure 6. Additions to a Disk-Storage Chain 



(TRADD) Loading and Additions Program 
for Trailer Records 

This program loads or adds all trailer records in a file. 
Input can be from cards, disk or tape. Trailer records 
are loaded into a separate area of disk storage set 
aside by the user. This area must have contiguous ad- 
dresses throughout, and the area must be distinct from 
the master-file area. A master record can have any 
number of trailer records, and there can be no trailer 
without a master. 

A 7-digit address field is appended to the front of 
each trailer record as it is loaded. The low-order posi- 
tion of this field is used as an availability indicator. 
This position always contains a character if the loca- 
tion is occupied, and a blank if the location is vacant 
(Figure 7). 

Trailer records can be written with up to ten records 
per block. Neither the block length nor the blocking 
factor need be the same as in the master file. Each 



Trailer Record 



Address of the 

Next Trailer 

Record 



Date Record 



43- 



record is written in the space immediately following 
the last-stored trailer record. The addresses of subse- 
quent trailers belonging to the same master record 
are written in the address field of the preceding trailer 
record. These are always 7-digit addresses in the form 
discussed in the Converted Record Addresses section 
under PASSl. The seventh digit is retained even when 
the trailer file is unblocked; though in this case, it 
is always zero. 

The first record location in the trailer area contains a 
dummy record. Whenever an initial load of trailers is 
being performed, with either new or reorganized 
input, at least the dummy record location must be 
cleared to blanks in the move mode. At the comple- 
tion of the initial loading run and each subsequent 
additions run, the address of the first available loca- 
tion in the trailer area is placed in positions 8-14 of 
this dummy record. Positions 15-20 contain a count of 
the number of trailer-record locations left in the area. 

Parameter Cards Required 



ROUTINE 

SYSTEMSPEC (optional*) 

DISKDRIVES 

EXITS (optional*) 

TYPEINPITT 
TYPERNUNLD 

(if reorganized) 

INPXJTMEDIA 
INPMASTREC 



MASTCONTRL 

ADDRESSING 

MASTBLOCK 

MASTLIMITS 

TRAILENGTH 

TRAILCNTRL 

TRAILBLOCK 

INLABELS (if disk input) 

OUTLABELS 



Figure 7. Layout of a 50-Character Trailer Record 



* See Parameter Cards to find out when this card can be omit- 
ted from the source deck. 
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The conversion routine must be used with this pro- 
gram. 

Note. This program must be generated to load either new 
trailers or a file unloaded by RNUNLD (reorganized). If gen- 
erated to load a reorganized file, the typernunld card is in- 
cluded with one of the operands: ACTIVE, TAGGED, or 
BOTH. However, the program will load any of the three kinds 
of record. During the initiaj loading of a reorganized trailer 
file, when the dummy record is blank, all trailer address fields 
in the master area are blanked prior to loading the trailers. This 
prevents incorrect trailer address fields from remaining on 
master records after the trailer file has been reorganized. 

Note that an entire reorganized trailer file does not have to 
be loaded during the initial reorganizing run. In subsequent 
runs of the reorganized TRADD program, if the dummy record 
is not blanked, the program will operate as a normal addi- 
tions run. 



(RNDEL1) Delete or Tag Program 
for Master and Trailer Records 

This program is used either to delete or tag master 
records and their associated trailers. The tagged rec- 
ords can later be deleted by RNDEL2. The input to 
the program must be from cards and consists of the 
control data of the records to be deleted or tagged. 
The input cards can contain as many control fields as 
will fit on a card. The control data must be punched 
in contiguous card columns starting in column 1. If 
control fields in the records are broken in sections, the 
sections must be punched in the order of importance 
(as specified in the mastcontrl card, not neces- 
sarily in order of appearance in the records). 

The control data of each record to be deleted or 
tagged is converted to the home address of the chain 
containing the record. The home address is sought and 
each link of the chain is examined until the record is 
found. 

If the record is only to be tagged, A- and B-bits are 
placed in the sixth position of the overflow-address 
field of the master record and in the sixth position of 
the appended field of each trailer record. 

If the record is to be physically deleted, the opera- 
tion of the program depends on the location of the 
record. The record to be deleted can be: 

1. a home record with no overflows 

2. a home record with overflows 

3. an overflow record in an existing chain. 

If the record to be deleted is a home record and is 
the only link in a chain, the record is deleted by blank- 
ing the entire record. 

If the record to be deleted is a home record and if 
there are one or more additional links in the chain, the 



0074125 (Home Address) 




Figure 8. Deletions from a Disk-Storage Chain 



home record is replaced by the entire contents (record 
and overflow address) of the first overflow location. 
The first overflow location is then blanked out. 

If the record to be deleted is an overflow record in 
an existing chain, the record is deleted (again by 
blanking the entire record) and the overflow-address 
field of the deleted record is placed in the previous 
link of the chain. For example, in Figure 8 the record 
in location 0074926 is being deleted. To maintain a 
continuous chain, the address 0074282, which occupies 
the overflow-address field of location 0074926, must be 
placed in the overflow-address field of location 007- 
4200. 

Whenever a master record is deleted or tagged, all 
trailer records associated with it are also deleted or 
tagged. As with master records, trafler records are 
deleted by blanking the entire record. 

If all record locations have terminal record-marks, 
these are not blanked. 



Parameter Cards Required 

ROXrriNE MASTBLOCK 

SYSTEMSPEC (optional*) MASTLIMITS 

DISKDRIVES TRAILENGTH 1 

EXITS (optional*) trailcntbl > if trailers 

INPMASTREC TRAILBLOCK J 

MASTCONTRL TYPEDELETE 

ADDRESSING LOADAtTOIT (optional*) 

nSTLABELS 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 

The conversion routine must be used with this pro- 
gram. 
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(RNDEL2) Delete Program for Tagged 
Master and Trailer Records 

This program deletes the master and trailer records 
that were previously tagged by RNDELl. 

The program scans the disk-storage area between 
the master-file limits, deleting the previously tagged 
master records and their associated trailer records. Re- 
linking the chains from which records are deleted is 
accomplished in this routine in the same manner as 
in the RNDELl routine. 



Parameter Cards Required 

ROUTINE MASTLIMITS 

SYSTEMSPEC (optional*) TRAILENGTH 

DISKDRIVES TRAILCNTRL 

EXITS (optional*) minorcntrl 

INPMASTREC TRAILBLOCK 

MASTCONTRL, TYPEDELETE 

ADDRESSING INLABELS 
MASTBLOCK 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 

The conversion routine is used by this program. 



Parameter Cards Required 

The parameter cards required to generate RNDEL 2 
are the same as those listed under RNDELl. The 
conversion routine is required for this program if the 
file is chained. 



(TRDEL) Delete Program for Single 
Trailer Records 

This program deletes single trailer records. The input 
must be from cards and consists of the control data 
of the trailer records to be deleted. Each record is 
specified by two control fields: a major followed by 
a minor. The major control field is identical to the 
control data of the master record. The minor control 
field indicates the particular trailer record to be de- 
leted. The control fields are punched in contiguous 
card columns, starting in column 1. If the major con- 
trol fields are broken in sections, the sections must be 
punched in the order of importance, as specified in 
the MASTCONTRL Card (not necessarily in order of ap- 
pearance in the records). Each card can contain as 
many complete control fields (major and minor) as 
will fit on a card. No spaces are left between control 
fields. 

The major control field is converted to the home 
address of the chain containing the master record. This 
chain is searched until the master record is found. 
From the trailer-address field in the master record, the 
program locates the first trailer record associated with 
that master. The trailer-record chain is then searched 
until the record identified by the minor control field 
is found. The trailer record is deleted by blanking it 
out. The trailer-address field of the deleted record is 
moved to the record preceding it in the chain. Termi- 
nal record marks are not deleted. 



(RNUNLD) Unload Program for 
Reorganizing a Random File 

This program is used to unload a random file of master 
or trailer records for subsequent reorganization and 
reloading. Master and trailer files must be unloaded 
separately. A file can be unloaded into cards, tape 
or disk storage. The program can unload: 

1. only the active records of a file 

2. only the tagged records of a file 

3. both active and tagged records. 

Several kinds of output are possible. The user's 
choice is specified in the typernunld and unldmedia 
cards. 

Card Output. If the file is punched into cards, the 
resulting card records will be in the format shown 
in Figure 9. The first eight positions contain an 
identification number. This number is the same for 
all of the cards for one record and is imique for 
each record. 

Columns 9 and 10 contain .an intrarecord sequence 
number, beginning with 01 for the first card of each 
record. 

If desired, master records can be preceded by 
either the converted address of the record or the 
trailer-address field, or both. The overflow-address 
field is always stripped from master records, and the 
trailer-address field is always stripped from trailer 
records. 

Non-home master records are indicated by a 12- 
punch over column 9 of the last card of the record. 

Tagged records (both master and trailer) are in- 
dicated by a 12-punch over column 10 of the last 
card of the record. 
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Figure 9. Card Ouput of RNUNLD 



Disk or Tape Output. Output on disk or tape can be 
blocked with up to 70 records per block. 

Unloaded master records can be in either of two 
formats, depending on the operands in the typer- 
NUNLD card. 

If CONADD is used, each master record is pre- 
ceded by a single character position that contains: 

1. A- and B-bits, if the record is tagged; otherwise, 
no zone bits. 

2. A 1-bit, if the record is a non-home record; other- 
wise, no numeric bits. 

This position is followed by a 7-digit field (6-digit 
if organized file is unblocked) that contains the con- 
verted disk address of the record. 

If NOCONADD is used, the record is preceded 
by only the single position for tag and home-record 
indication. 

The user also specifies whether the output master 
record is to include the 7-digit trailer-address field. 

When trailer records are being unloaded, the 
trailer-address field is stripped from the record. A 



single character position is appended to the front 
of the record. If the record is tagged, this position 
contains A- and B-bits. If the record is not tagged, 
this position contains a blank. 

Note. This tag-zone position is always appended, regardless 
of the operands: ACTIVE, TAGGED, or BOTH. 



Parameter Cards Required 



ROUTINE 

SYSTEMSPEC (optional*) 

DISKDRIVES 

EXITS (optional*) 

INPMASTREC 
MASTCONTRL 
ADDRESSING 
MASTBLOCK 



MASTLIMCrrS 

TRAILENGTH 

TRAILCNTRL 

TRAILBLOCK 

TYPERNITNLD 

UNLDMEDIA 

INLABELS 

OUTLABELS 



(if unloading 
trailer file) 



(if disk output) 



* See Parameter Cards to find out when this card can be omitted 
from the source deck. 

The conversion routine is used if the typernunud 
card contains the entry CONADD. 
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Control-Sequential Programs 



The five Control-Sequential Disk-File Organization 
programs load and maintain a presequenced file. The 
programs construct and use a distribution index that 
makes it possible to locate records quickly within the 
file area. Linkage is established to records added and 
around records deleted. 

The control-sequential programs that can be gen- 
erated are: 

1. CSLOAD Loads a presequenced file and builds the dis- 

tribution index. 

2. CSADD Adds records to a sequential file 

3. CSDELl Deletes or tags records 

4. CSDEL2 Deletes previously tagged records 

5. CSUNLD Merges the main sequential file with any rec- 

ords added by the CSADD program and 
either: 

a. unloads the file for use with other programs 

b. reorganizes the file and rebuilds the distri- 
bution index. 

A complete set of control-sequential programs gen- 
erated for a given file normally includes each of the 
above-mentioned programs and at least one additional 
version of: 

1. CSDELl The first deletes records 

The second tags records. 

2. CSUNLD Various versions produce: 

a. 1-pass reorganization in a new file area 

b. 2-pass reorganization in the original area. 

c. Stripped, merged output for CSLOAD and 
other programs. If this type of output is 
used to reorganize a file, an additional ver- 
sion of CSLOAD is required. 



Work Tracks 

An area immediately preceding the main-file area may 
be required for these programs to use as working 
storage. One, two, or three tracks may be required, 
depending on the amount of core storage in the system, 
the kind of disk unit used, and whether disk or tape 
labels are used. 

Figure 10 shows the work area for both 1301 and 
1311 main-file areas. 

1. The first track preceding the main-file area is always 
required if the file is in 1301 disk storage. If the file 
is in 1311 disk storage, this track is used only in a 
4K system. It is used for temporary storage of pro- 



gram overlays. Nothing is retained on the track 
from one run to the next; therefore, it can be used 
as a work area by other programs. 

2. The second and third tracks preceding the main- 
file area are used to store disk-label checking rou- 
tines and tape I/O routines. If the programs neither 
process disk labels nor process tape input-output, 
these tracks need not be reserved. Nothing is re- 
tained on these tracks from one run to the next; 
therefore, they can be used as a work area by other 
programs. 

Note. When the first track is not used for program overlay, 
the program still skips to the second and third tracks to store 
the label routines. 



(CSLOAD) Load Program for 
Control-Sequential Files 

This program loads a presequenced file into disk stor- 
age. The card, tape, or disk input file can be in either 
ascending or descending sequence. The load program 
bypasses and prints the control field of any record 
that has control data out of sequence. At least the first 
block of the organized file area must be cleared to 
blanks in the move mode before performing the initial 
load. 

A maximum of ten records can be written in each 
block in a 4K system, and a maximum of 30 records 
per block, in an 8K or larger system. Unused positions 
at the end of disk blocks are padded with blanks. 

A field of blanks is appended to the end of each 
record as it is loaded. If the file is unblocked, this is 
a 6-digit field; if blocked, a 7-digit field. These fields 
are used for any sequence links made necessary by 
additions to, or deletions from, the file. 

CONTROL SEQUENTIAL FILE IN 1311 or 1301 DISK STORAGE 

Label Checking and Tape I/O Routines (if disk labels or any tape I/O) 

Program Overlay (If 1311 file, this track used in 
4K system only) 



Data File- 



V i 

Three tracks pre- T 

ceding lower limit "—Lower limit of main file 

Figure 10. Work Tracks Preceding Main Sequential File Area 
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Figure 11. Dummy Record Preceding Main Sequential File 
Area 



A dummy record is written in the first record loca- 
tion in the file area (Figm-e 11). This dummy record 
contains: 

1. the address of the last record in the main-file area. 

2. the address of the last entry made to the distribu- 
tion index. 

3. the address of the first record in the file, if that rec- 
ord is not the one that immediately follows the 
dummy record. This situation arises when: 

a. a record is added in the additions area that se- 
quentially precedes the first record in the main 
area or, 

b. the fiu-st record in the main-file area has been 
deleted. 

The first position of the sequence-link field Contains 
A- and B-bits to indicate a dummy record. 

The first input record is written in the second record 
location, and each subsequent record is written in the 
next consecutive location. 



record, the twentieth, the fortieth, the sixtieth, and 
so on, until the last record has been loaded. An entry 
is then made for the last record unless it was already 
entered as a result of being an nth record. 

If a subsequent run is made with CSLOAD to load 
additional records at the end of the main-file area, the 
count begins again at 001 when entries are being made 
for every n records. The last entry made during the 
last run is not removed, and an entry is not made for 
the first record of this run. Thus, in this case, the con- 
sistency of the interval of n recoi'ds between entries 
might be broken. Additions to and deletions from the 
file can also break the consistency of the intervals. 
However, if an entry is made once per cylinder, the 
entry made for the last record of the previous run is 
replaced by that for the first record in the next cylin- 
der, provided the last entry did not occur at the start 
of the cylinder. 

The index is written in disk storage in an area speci- 
fied by the user. The area must be within one disk 
pack or module. It is written one sector per block, with 
up to ten complete entries in one sector. The number 
of entries that can be written in a sector depends on 
the length of an entry. The length of an entry equals 
the length of the control fields in the record plus six 
if the file is unblocked, or seven if the file is blocked. 

The address portion of the entry indicates the posi- 
tion of the record within tKe block. Standard 6-digit 
disk addresses are used in an unblocked file. A seventh 
digit (R) is added to the addresses used with blocked 
files. These addresses are in the form: SSSSSSR. The 
first six digits are the address of the first sector in the 
block. The seventh digit (R) designates the position of 
the record within the block. This number can range 
from to 9 and has: 



Distribution index 

A distribution index is set up by CSLOAD as the file 
is loaded. This index is used to locate records within 
the sequential file. (See Random Processing of a Se- 
quential File.) The distribution index is also used by 
CSADD and CSDELl. The user specifies the fre- 
quency with which entries are to be made to the index. 
An entry consists of the control data of a record, fol- 
lowed by its disk address. An entry can be made for 
the first record written in each cylinder or for every 
nth record. An entry is always made for the first and 
last records loaded. 

For example, if the user specifies that an entry is to 
be made for every 20 records, it is made for the first 



• No zone bits, for records 1-10 

• B-bit, for records 11-20 

• A- and B-bits, for records 21-30. 



Parameter Cards Required 



ROxrriNE 

SYSTEMSPEc (optional*) 

DISKDIUVES 

EXITS (optional*) 
TYPEiNPxrr 

INPXJTMEDIA 
INPMASTREC 



MASTCONTRL 
MASTBLOCK 
COLLATE 
DISTENTRY 

LOADAxrorr (optional*) 
TYPECSUNLD (if reorganized) 
INLABELS (if disk input) 

OUTLABELS 



* See Parameter Cards to find out when this card can be omitted 
from the source deck. 
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(CSADD) Additions Program for 
Control-Sequential Files 

This program is used to add records to a control- 
sequential file that has already been loaded. The rec- 
ords to be added must be in the same format as the 
original records and the additions-file area must follow 
the same file specifications as the original file area. 
The input media need not be the same as for the ini- 
tially loaded file. For example, the original file could 
have been loaded from disk, and the additions, from 
cards. Disk or tape input blocks need not be the same 
length nor have the same number of records per block 
as the original input file. The card, tape, or disk input 
must be in the same sequence (ascending or descend- 
ing) as it was for the load program. CSADD loads the 
additions records into a separately defined area of disk 
storage. The additions file area must be cleared to 
blanks in the move mode before performing the initial 
additions run. As each record is loaded, its disk ad- 
dress is written in the sequence-link field of the record 
that sequentially precedes it in the file. The address 
of the record that sequentially follows the added rec- 
ord is placed in the sequence-link field of the added 
record. See Distribution Index under CSLOAD for a 
description of these addresses. 

The first record location in the additions area con- 
tains a dummy record (Figure 12). Whenever CSADD 
is used, the address of the last record added is placed 
in the first 6 or 7 positions of the dummy record. The 
next seven positions contain the number of records 
that can be added to the file. When the additions area 
is filled, this number is 0000000. The sequence-link 
field of this dummy record is blank except for A- and 
B-bits in the first position. These zone bits identify the 
dummy record. 

CSADD makes use of the distribution index to lo- 
cate records. It never adds new entries to the index. 
However, the program changes the last entry in the 
index when the record added sequentially follows the 
last record in the main-file area. In this case, the control 
data of the last record added replaces the control data 
of the last entry in the index. The disk address in the 



Address of last record 



added 



Unblocked 
File 

Blocked 
File 



A- and B-bits 
(high-order position) 



Number of unused 
record locations in 
additions area 
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1 - 7 


8 - 14 
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last entry remains the same and is still the address of 
the last record in the original file area. 

If additions are to be made to the end of the file 
(that is, if all the records to be added contain control 
numbers beyond the last control numbers of the origi- 
nal input) the load program (CSLOAD) may be used 
to load the additions. 



Parameter Cards Required 



ROUTINE 

SYSTEMSPEC (optional*) 

DISKDRIVES 

EXITS (optional*) 

INPUTMEDIA. 
INPMASTREC 



MASTCONTRL 

MASTBLOCK 

COLLATE 

LOAD AUDIT (optional*) 
INLABELS (if disk input) 

OUTLABELS 



Figure 12. Dummy Record Preceding Additions Area 



* See Parameter Cards to find out when this card can be omitted 
from the source deck. 



(CSDEL1) Delete or Tag Program for 
Control-Sequential Files 

This program is used either to delete or tag records in 
a control-sequential file. The input must be from cards 
and consists of the control data of the records to be 
deleted or tagged. The input cards can contain as many 
control fields as will fit on a card. The control fields 
are punched in contiguous card columns, starting in 
column 1, If control fields are broken in sections, the 
sections must be punched in the order of importance 
(as specified in the mastcontrl card, not necessarily 
in order of appearance in the records). Records can be 
deleted in any sequence. When a large number of rec- 
ords are deleted, however, the records should be de- 
leted in sequence for fastest operation of the program. 

Tag Records. A- and B-bits are placed in the sixth 
position of the sequence-link field of each record 
tagged. 

Delete Records. Deleted records are replaced by 
blanks. Terminal record marks (if present) are re- 
written. If the record being deleted contains an ad- 
dress in its sequence-link field, this address is moved 
to the sequence-link field in the record that se- 
quentially precedes the deleted record. Otherwise, 
relinking is accomplished by moving the address of 
the record that follows the deleted record into the 
sequence-link field of the record preceding the 
deletion. 

This program uses the distribution index to locate 
records but does not make any changes to the index. 
If desired, this program can print all records deleted. 
The entire record is printed. 
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Parameter Cards Required 



ROUTINE 

SYSTEMSPEC (optional*) 

DISKDRIVES 

EXITS (optional*) 

INPMASTREC 



MASTBLOCK 

MASTCONTRL 

CXJLLATE 

TYPEDELETE 

INLABELS 



* See Parameter Cards to find out when this card can be omitted 
from the source deck. 



(CSDEL2) Delete Program for Tagged 
Control-Sequential Records 

This program deletes the records that were tagged 
by CSDELl. 

The program scans the entire file, following the se- 
quence chain through the main-file area and the addi- 
tions area, and deleting the previously tagged records. 
Relinking the sequence chain is accomplished in this 
program in the same manner as in CSDELl. 

This program does not use the distribution index. If 
desired, this program prints all records deleted. The 
entire record is printed. As in CSDELl, terminal rec- 
ord marks, if present, are retained. 

Parameter Cards Required 

ROUTINE INPMASTREC 

SYSTEMSPEC (optional*) MASTBLOCK 

DISKDRIVES TYPEDELETE 

EXITS (optional*) inlabels 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 



(CSUNLD) Unload Program for 
Reorganizing a Control-Sequential File 

This program is used to unload a control-sequential 
file, A file can be unloaded into cards, disk storage, or 
tape. The program can unload: 

1, only the active records of a file, or 

2, only the tagged records of a file, or 

3, both active and tagged records. 

The possibility of several types of output is offered. 
The user's choice is specified in the typecsunld and 
UNLDMEDiA cards. As the file is unloaded, the records 
in the additions area are merged with those in the 
main-file area. 

Card Output. If the file is punched into cards, the 
sequence-link field is stripped from the records. The 
cards are punched in the format required for input 
to CSLOAD (see Card Files, Figure 14). Tagged 
records are indicated by a 12-punch over column 10 
of the last card of the record. 



Disk Output. Three kinds of disk output are possible: 

1. Stripped Merge. If the typecsunld card has the 
operand NOLINK, the records in the main-file area 
and in the additions area are merged and written 
into a third disk area. The sequence-link field is 
stripped from the end of the records. A single char- 
acter-position is appended to the front of each rec- 
ord. Tagged records are indicated by the presence 
of A- and B-bits in this position. 

The ouput file can be reloaded by a version of 
CSLOAD generated to load a reorganized file. The 
tag bits are moved back to the sixth position of the 
sequence-link field when reloading, and the tag-bit 
position is dropped. 

If this form of output is used, the output file can 
be blocked with up to 70 records per block. 

No audit-trail print is available with this stripped 
merge. The distribution index is not rebuilt. 

2. Relocated Merge. If the typecsunld card has the 
operand LINK, the file is merged and loaded into 
a new file area in one operation. In this case the 
sequence-link field is blanked except for tag-zone 
bits, and the field is retained. The output file is re- 
sequenced and corresponds to the usual output of 
CSLOAD. 

Neither the block length (number of sectors per 
block) nor the blocking factor (number of records 
per block) need be the same in the new file as in 
the old. 

The distribution index is rebuilt as the file is 
loaded and can be written in the same area as be- 
fore or in a new area. The interval between entries 
in the index need not be the same as for the pre- 
vious file. 

The load audit option is available with this opera- 
tion. 

3. 2-Pass Merge. If the typecsunld card contains 
the operands LINK, 2PASS, the file is merged and 
then written back into the original file area. The 
primary use of this operation is to reorganize files 
that occupy more than half of the on-line disk- 
storage space. The program requires a disk work 
area at least equal in size to the old additions area 
plus one disk block of that additions area. 

The entire file is merged during the first pass. At 
the completion of this pass, the file is in sequence 
with the first sequential record in the second record 
location of the work area. The sequence continues 
through the entire work area and then continues 
from the first record location in the main-file area. 

During the second pass, the two sections of the 
file are written in the proper order in the output 
area starting at the lower limit of the original main- 
file area. 
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Neither the block length (number of sectors per 
block), nor the blocking factor (number of records 
per block), need be the same in the new file as in 
the old. However, the ratio of the old blocking factor 
to the old block length must not be greater than the 
ratio of the new blocking factor to the new block 
length. 

old blocking factor <--- new blocking factor 

old block length new block length 

The distribution index is rebuilt as the file is 
loaded during the second pass and can be written 
in the same area as before, or in a new area. The 
interval between entries in the index need not be 
the same as for the previous file. 

The load audit option is available with this opera- 
tion. 

Tape Output: This is the same as for stripped-merge 
disk output. 

Parameter Cards Required 

ROUTINE DiSTENTRY j (if scqucnce- 

SYSTEMSPEC (optional*) LOADAUDFT > link field is 

DiSKDRivES (optional*) J retained) 

EXITS (optional*) typecsunld 

INPMASTREC UNLDMEDIA 

MASTCONTRL INLABELS 

MASTBLOCK OXTTLABELS (if disk OUtput) 

* See Parameter Cards to find out when this card can be omitted 
from the source deck. 
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Input/Output Files 



Disk Files 

Object programs can be generated to operate on files in 
either or both 1311 and 1301 disk storage. For example, 
an input file can be on 1311 disk storage and the or- 
ganized output file on the 1301. Any given file or group 
of associated files, however, must be contained entirely 
in one or the other of the kinds of disk unit. This ap- 
plies to random master and trailer files and the work 
area used for disk output of nonhome records or ad- 
dresses. For control-sequential files, it applies to the 
main-file area, the additions area, the distribution- 
index area, and the temporary area used for a two- 
pass CSUNLD. 

AU disk input and output areas used by these file- 
organization programs are defined by lower- and 
upper-limit disk addresses. The limits of the master- 
file area used by the random programs are specified in 
the MASTUMTTS parameter card when generating the 
random programs. The limits of all other disk input/ 
output areas are specified at object time in IOCS bdun 
macro information cards. These cards (referred to as 
BDLiN cards) are used for all files regardless of 
whether they have associated disk header labels. The 
RDUN cards required for each file are described later 
in this section. 



Single- and Multiple-Area Files 

Certain disk input and output files can be defined as 
multiple areas by more than one set of limits. Others, 
depending on the particular program and the size of 
the system, must be contained within one area and 
defined as such within a single set of limits. 

A group of disk records can be defined with a single 
set of limits if the entire area is on-hne at one time 
and if consecutive disk addresses are used throughout 
the area. A single exception to the requirement of con- 
secutive addresses is the case of a labeled 1311 file 
extending from the end of one pack to the beginning 
of another. These programs will skip the 20 addresses 
normally on the last track and continue on the first 
track on the next disk pack. For example, if the limits 
of a file area are given as 010000-030000, the program 
would read from 010000 to 019979 and then auto- 
matically bypass the header-label track and skip to 
another disk drive to read 020000 to 030000. 

Note: The last record of the last complete block in a disk 
pack can be, but need not be, an EOR trailer label. 



The limits of a single-area file are given in one edlin 
card, regardless of the number of disk packs or mod- 
ules used. A RDLiN card must be supplied for each area 
of a multiple-area file. 



Input Files 

The organized-file areas are used as input to the delete 
and unload programs. See Output Files for a descrip- 
tion of these areas. The specifications of the input files 
for each of the loading and additions programs are as 
foUows: 

PASSl, PASS2, and CSLOAD. These programs can 
accommodate multiple-area input files, regardless of 
core-storage capacity. The program reads the first 
RDLIN card and processes the area that it defines. 
If the end of a pack or module is reached (with or 
without an EOR trailer label) before the upper limit, 
the program automatically continues to the next disk 
pack or module. 

When an EOR trailer label is read and the upper 
limit has been reached, the program halts. If an 
EOR trailer label is read and neither the upper limit 
nor the end of a pack or module has been reached, 
the program also halts. The operator can supply the 
RDLIN card for the next area and, if necessary, place 
a new disk-pack on-line. Pressing start causes the 
program to read and process the new rdlin card. 

When an EOF trailer label is read or when the 
upper limit of an input area is reached before find- 
ing an EOR or EOF trailer label, the program pro- 
ceeds to the end-of-job. 

RNADD, CSADD, and TRADD. The specifications of 
disk files allowable as input to the three additions 
programs depend on the core-storage capacity of the 
system on which the program is run. 

In a 4K system, input to RNADD and CSADD 
must be contained within one area and that area must 
be contained in a single disk pack or module. 
TRADD can accommodate a multiple-pack or mod- 
ule input file but it must be defined by a single set 
of limits as one area. 

In an 8K or larger system, input files can be 
broken into multiple areas on as many disk packs 
or modules as necessary. They are processed as de- 
scribed for PASSl, PASS2, and CSLOAD. 
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Output Files 

The following output files can be broken into multiple 
areas: 

1. Non-home records written by PASSl, if the entire 
record is written in the disk work area (RECIN- 
WORK option). 

2. The output of RNUNLD. 

3. The output of CSUNLD, if all of the appended 
fields are stripped from the output records (stripped 
merge). 

In the three cases mentioned here, where output files can 
consist of multiple areas, an EOR label is written and the 
program halts when the upper limit of the area defined is 
reached before all records are processed. The user can supply 
a new rdlin card and, if necessary, change output disk packs. 
Pressing start causes the program to read and process the new 
RDLIN card. 

All Other disk output must be contained within one 
contiguously addressed area. These areas are: 

1. The master-file area of the random routines. 

2. The non-home work area written by PASSl, if only 
the addresses of non-homes are written (ADDIN- 
WORK option). 

3. The trailer-file area produced by TRADD. 

4. The main-file area of the control-sequential pro- 
grams, whether produced by CSLOAD or CSUNLD. 

5. The distribution-index area produced by CSLOAD 
or CSUNLD. 

Note: This area must be contained in one disk pack or 
module. 

6. The additions area produced by CSADD. 



Disk RDLIN Cards 

A BDLiN card must be supplied for each disk area (1311 
or 1301) to be operated upon by a program. These 
cards supply the control number(s) of the disk drive(s) 
or module(s) being used and the limits of the file area. 
If 1311 disk header labels are to be processed, the 
BDLIN cards also contain the label information to be 
used. The cards are punched as follows: 

Columns Contents 

1-5 Area identification 

6-10 blank 

11-15 Disk drive(s) or module(s) on which the file 
area is located. 

16-20 RDLIN 



Note: Columns 21-54 are used only for labeled files in 1311 
disk storage. 



21-24 


File-Retention Period 


25-29 


Creation Date 


30-39 


File Identification 


40-44 


File Serial Number 


45-49 


Pack Serial Number 


50 


blank 


51-54 


File Sequence Number 


55-60 


Lower Limit 


61-66 


Upper Limit 



Area Identification. An entry identifying the disk area 
defined by the card. (Not to be confused with the 
file-identification field in the label portion of the 
card.) 

The area-identification field is used by these pro- 
grams to ensure that the bdlin cards are read in 
the proper order. The entires for the various areas 
are: 

INPUT = disk area(s) used as input to the loading and ad- 
ditions programs: 

1. PASSl and CSLOAD — The file to be loaded. 

2. PASS2 — The INPUT cards used in PASSl are used 
in PASS2 also, unless the RECINWORK, RECIN- 
CARD, or RECONTAPE non-home option is taken. 
See WORKF. 

3. RNADD, TRADD, and CSADD — The area contain- 
ing the records to be added. 

MASTR = the organized master-file area of the random rou- 
tines and the main-file area of the control-sequential 
routines. 

Note: Although there are no trailer records, thus no pos- 
sibility of master records in the ordinary sense, the main- 
file area of a control-sequential file is often referred to as 
the master -file to distinguish it from the additions area. 

Note. PASSl is used to make additions to a file with 
unique addresses. When making additions, piuich an A 
in column 10 of the MASTR RDLIN card to bypass the 
routine that clears the file area. 

INDEX = distribution-index area 

TRAIL = organized trailer-file area 

ADDIT = control-sequential file additions area 

WORKF = output area for: 

1. PASSl — non-home records or addresses. If WORKF is 
used in PASSl, the same card is used in PASS2. 

2. RNUNLD - all disk output 

3. CSUNLD — all disk output, except temporary area used 
during 2-pass unload (see TEMPF). 

The final reorganized area of a reorganized unload and 
the output area of a stripped unload are defined in the 
WORKF card. 

TEMPF = temporary file area dvuring 2-pass CSUNLD. 
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Disk Drives or Modules 

If any portion of the file area is in a 1311 disk pack 
with addresses: 

000000-019999, punch the drive control number in column 11. 
020000-039999, punch the drive control number in colxrnm 12. 
040000-059999, punch the drive control number in column 13. 
060000-079999, punch the drive control number in column 14. 
080000-099999, punch the drive control number in column 15. 

The numbers punched are: 

for the first drive in the system 
2 for the second drive 
4 for the third 
6 for the fourth 
8 for the fifth. 

If any portion of the file area is in a 1301 module 
with addresses: 



000000-199999, punch the module identification 
200000-399999, punch the module identification 
400000-599999, punch the module identification 
600000-799999, punch the module identification 
800000-999999, punch the module identification 

The characters punched are: 



in column 11. 
in column 12. 

column 13. 

coliunn 14. 

column 15. 



? (plus zero) for the first module in the system 

B for the second module 

D for the third 

F for the fourth 

H for the fifth 

Note. These identification characters are not the same as the 
alternate codes used in the disk-control field (=4=, S, U, W, Y), 
nor are they the numeric portion of these characters (0, 2, 4, 
6, 8), as used in the rdlin cards read by lOCS-produced rou- 
tines in user programs. 

RDLIN. The entry RDLIN is derived from the IOCS 
RDLIN (read label information) macro instruction. 
To simplify programming, the same card is used by 
these routines for labeled and unlabeled files. 

Label Information. The information punched in col- 
umns 21-54 is discussed under Disk Labels. 

Address Limits. The lower Hmit punched in the 
INPUT RDLIN card is the address of the first sector 
in the first block in the area, regardless of its posi- 
tion within a track. The upper limit punched is the 
address of the first sector in the last block in the area. 
In all RDLIN cards other than the INPUT card, 
the lower limit must be the address of the zero 
sector of the first track in the area. The upper Hmit 
must be the zero sector of the last track in the area. 
If disk labels are written, this upper hmit address 
is adjusted by the program and the actual upper 
limit address written in the label is the address of the 
last sector in the last track in the area. 



Disk Labels (1311 files only) 

Files organized in 1311 disk storage can have disk 
header labels. If labels are specified, routines to process 
them are taken from the IOCS Ubrary. Header labels 
are not processed for 1301 files. If the load programs 
are to write 1311 disk header labels, the Disk Label 
Program (part of the 1440 and 1401-1311 disk utility 
program packages) must have been used to set up the 
initial header-label track. The IOCS publications de- 
scribe the standard 1311 disk header labels and the 
processing performed by the IOCS routines. 

The entries in parameter cards inlabels and out- 
labels determine whether header labels are to be 
processed and, if so, the extent of checking to be 
performed. The standard IOCS options are available. 
See Label Checking for label operations performed by 
each of the programs. 

Input Header Labels 

The header-label checking performed on input files 
consists of a comparison between certain fields in the 
RDLIN card and the corresponding fields in the header 
labels on the designated disk pack(s). If an equal 
comparison is made (on each pack designated), the 
file is accepted. If an equal comparison is not made; 
that is, if the label requested is not found, the program 
halts, allowing the user to replace the disk pack. 

The comparison is made using either the file- 
identification field only, or each of the first six fields in 
the EDLiN card. When a full check on the header labels 
of a multiple-pack file area is performed, the pack 
serial number is checked on only the first pack. A one 
(1) is added to the file-sequence number for each sub- 
sequent pack. 

Output Header Labels 

The user chooses whether to have header labels writ- 
ten on his 1311 output files. If they are written at all, 
they must be written for all associated disk output 
areas. Thus, if labels are written for the master-file 
area, they must also be written for the trailer file and 
for the disk work area used for non-home records 
during PASSl. 

When writing header labels for output files, the user 
must insert a date card in the object deck. The date 
card is punched as follows: 



Columns 


Contents 


1-3 


082 


4, 5 


05 


6 


Word separator (0-5-8 punch) 


7, 8 


Year (for example, 63) 


9-11 


Day of year (001 represents Jan. 1, 




365 represents Dec. 31) 
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The date is used by the programs to ensure that 
there are no unexpired files with Hmits overlapping 
those in the header label that is to be written. 

If there are no unexpired files within the area, the 
label is written with each of the fields in the rdlin 
card copied into the corresponding location in the 
label. In the event of a multiple-pack output area, the 
process is repeated for each pack, using the same 
RDLIN card. The existing pack serial number is retained 
in the labels on subsequent packs, and the file se- 
quence number is increased by one (1) for each pack. 
The limits written in the header label of each pack are 
the correct limits for the section contained within the 
pack. 

Cylinder Overflow 

When disk files are processed, certain block lengths are 
such that a block overflows from one cyUnder to the 
next. For example, if 3-sector blocks are processed in 
an area where the first block begins in sector 000000; 
the last complete block in the first cylinder ends in 
sector: 



1311 
000197 

The next block begins in: 

1311 
000198 

and overflows to: 

1311 
000200 



1301 
000797 



1301 
000798 



1301 
000800 



Input to these programs can begin with any sector 
on a track. Therefore, depending on the starting ad- 
dress, cylinder overflow can occur in input files with 
any block length other than single-sector blocks. 

Output files must begin at the zero sector of the first 
track in the area. Therefore, cylinder overflow can 
occur in output files, only if the block length is not 
evenly divisible into 20. 

The programming necessary to process overflow 
blocks is generated in these programs if: 

1. input files have more than one sector per block. 
In this case, overflow blocks are checked for blank 
record locations. If records are present, they are 
processed; if not, the block is skipped. 

2. output files have a block length (sectors per block) 
that is not evenly divisible into 20. 

Cylinder overflow must not occur (on input or out- 
put) from one disk pack or module to the next. The 



disk block that would have caused such overflow must 
begin at the zero sector of the first track on the next 
pack. In the case of the random programs, it is up to 
the user's conversion routine to ensure that pack over- 
flow does not occur and that the first block in subse- 
quent packs begins in the zero sector of the first track. 
The control-sequential programs automatically skip to 
the zero sector of the next pack or module. 



Address Structure and Mode of Operation 

These programs perform all operations in the move 
mode (7-bit coding). All input files, therefore, must be 
in the move mode. The random master-file area must 
be in the move mode before the initial run of PASSl 
is performed. At least the first record location (dummy 
record) in the following output-file areas must be 
cleared to blanks in the move mode before performing 
the initial run of the program indicated: 

1. main-file area written by CSLOAD 

2. additions area written by CSADD 

3. trailer area written by TRADD. 

Disk addresses must not be repeated on any track 
used by these programs. All disk addresses normally 
associated with a track must be present. Addresses 
must be in sequence within a disk block, but the blocks 
can be arranged in any order found most suitable for 
the file. For example, in a file with 5-sector blocks, the 
sector addresses on the first track could be written in 
the order: 0-4, 10-14, 5-9, 15-19. This kind of sequenc- 
ing can often greatly reduce rotational delay time. 

Two disk packs or modules containing the following 
related file areas must not have the same range of 
addresses: 

1. random master and trailer file areas. 

2. control-sequential main file, additions area, tempor- 
ary area (for 2-pass unload), and distribution index 
area. 

Disk areas used as input to the load and additions 
programs and output from the unload programs can 
have the same addresses as the organized-file areas. 

When the work tracks preceding the main-file areas 
are used for program overlays, they are written in the 
load mode. These tracks are not cleared at end-of-job 
and therefore remain in load mode after completion of 
of the program run. The first one or two tracks pre- 
ceding the random master file (used for the availability 
table) are written in the move mode. The only require- 
ment of concern to the user when initially preparing 
his disk areas is that these tracks haye the proper 
addresses. They can be in either the move or load 
mode and need not be cleared to blanks. 
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Block Length 

When disk files are processed, it is generally true that 
the largest possible block length (sectors read and 
written in one operation) results in the fastest process- 
ing. In a chained random file, the longer the block, the 
better the chance of storing non-home records in the 
home block. In a control-sequential file, the main ad- 
vantage is the fact that rotational delay time need be 
lost only once per block. There are exceptions to this 
rule: 

1. In a random file with no synonyms, the optimum 
block length is that number of sectors required to 
hold a single record. 

2. If the time required to process all of the records in 
a control-sequential block slightly exceeds a track 
revolution, it may be better to shorten the block, 
again minimizing the rotational delay. 

The block length chosen for a given file depends on 
many factors other than minimum read/write time. 
For example, a maximum of ten records can be writ- 
ten per block in the random files organized by these 
programs. Therefore, the block length used would 
never exceed that number of sectors required to hold 
ten records. Storage utilization is another factor that 
must be weighed and balanced with time savings. A 
particular block length might be used that is less than 
the maximum possible if that block length results in a 
minimum of wasted disk-storage space. 

The one overriding factor that always sets an upper 
limit on block length is the core storage available to 
read and write the block. The amount of core storage 
remaining for I/O areas depends on the amount re- 
quired for the actual program instructions, constants, 
work areas, etc. Because the block length of a file is 
normally the same for all programs that operate on the 
file (this must be true for the file-organization pro- 
grams), it can be no greater than that used in the 
largest of those programs. 

Block-Length Limits Set by File-Organization 
Programs 

The file-organization object programs are generated 
to fit the parameters of specific files. Only those opera- 
tions actually called for by the user are included in the 
programs. There are no unnecessary routines included 
to take care of several possible formats or contingen- 
cies. During operation of the programs, certain rou- 
tines are written in the work-area tracks preceding the 
master-file area. These routines are read and executed 
whenever needed. The amount of core storage required 
for the generated object programs can thus be kept at 
that minimum necessary to do the job. The remaining 
core storage can be used for input/output areas and 

the user's subroutines. 

Some factors aflFecting the size of the object pro- 
grams are: 



1. the input media. 

2. whether the number of sectors per block is such 
that cylinder overflow is possible and, therefore, 
whether the routines necessary to handle it must be 
generated. 

3. whether there is one record per block in the organ- 
ized file, or more than one. 

4. the choice of available options, such as: 

a. kind of output for non-home records during 
PASSl and the output requested for the unload 
programs. 

b. the load audit or print options. 

5. the length of control fields in the records and the 
number of subfields comprising the control data. 

6. whether chaining is required in a random file 
(chaining is required only if there are duplicate ad- 
dresses). 

7. whether trailer records are used. 

8. the special features used. 

Note. The use of certain special features, such as the ad- 
vanced programming feature, decreases the amount of pro- 
gramming needed and, therefore, leaves more room for data 
records. 

The additions programs, RNADD and CSADD, are 
the largest of the file-organization programs generated 
from any given set of parameters. Except in special 
cases involving trailer records, these additions pro- 
grams determine the maximum permissible block 
lengths. Because this is the case, it is usually true that, 
if a given input block and organized master- or main- 
file block fit the additions programs, they are permis- 
sible for the other programs also. 

Figure 13 shows the sizes of RNADD and CSADD 
object programs that were generated with a choice of 
parameters chosen to give minimum and maximum 
size programs. The values shown in the figure can be 
used as a guide in determining whether a proposed 
block length is well within the allowable range or if 
trial programs should be generated to test the exact 
combination of parameters and subroutines. The in- 
creased core-storage requirements in the 8K or larger 
systems is due to the fact that additional functions are 
performed in the larger systems and portions of pro- 
grams that are overlayed from disk storage in the 4K 
systems are kept in core storage in the 8K and larger 
systems. The largest single factor aflFecting the size of 
these programs is the room required to handle multi- 
ple-record blocks. The figure shows the maximum sizes 
of RNADD and CSADD when generated to process 
unblocked (input and output) files. 

The core storage remaining must be used for all 
subroutines supplied by the user (including conversion 
routines, exit routines, and card-assembly routines in 
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excess of 190 positions) and for the input/output areas 
shown in Figure 13. 

Note. Card-assembly routines supplied by the user replace 
a 190-position routine normally generated from the library rou- 
tines. 

RNADD is not used if there are no synonyms in a 
random file. CSADD is not used if all additions are 
made to the end of a control-sequential file. In these 
cases, PASSl and CSLOAD set the limits on block 
length. 

The maximum block length of trailer files is set by 
TRADD. The block lengths possible for disk or tape 
output of the unload programs are set by RNUNLD 
and CSUNLD. 



Example 

Assume that the following file is to be organized as a 
random file with trailers in a 4K 1440-1311 system. 

Disk Input. 

131-character input record (130 character data 
record + terminal record mark) 400-character input 
block (3 records in 4 sectors) 



Disk Output. 

145-character master record (7-digit trailer ad- 
dress + 130-character data record +7-digit over- 
flow address -j- record mark) 

300-character master block (2 records in 3 sectors) 

To determine whether these files will fit, refer to 
Figure 13: 

Maximum RNADD object program = 3290 positions 
Input area = 400 positions 

Master-file block = 300 positions 

Master record = 145 positions 

Total core storage required = 4135 positions 

Thus, we see that this file would not fit in the maxi- 
mum case. But it must be emphasized that the maxi- 
mum case is an unusual case. Several factors can 
shorten the object program. For example, if the object 
machine has the indexing-and-store-address-register 
feature, 80 to 100 positions are saved. Note also that 
the maximum case assumes 30-character control fields, 
broken into three subfields. In this case it would be 
necessary to perform a trial generation of the RNADD 
program to see if the block will fit. 



OBJECT 
PROGRAM 


OBJECT SYSTEM 


INPUT/OUTPUT 
AREAS USED 


1401-1311 


1440-1311 


1440-1301 


1460-1301 


4K 


8-1 6K 


4K 


8-1 6K 


8-16K 


8-1 6K 


Min. 


Max. 


Min. 


Max. 


Min. 


Max. 


Min. 


Max. 


Min. 


Max. 


Min. 


Max. 


RNADD (blocked) 
RNADD (unblocked) 


2510 


3280 
2880 


2420 


5140 
4730 


2530 


3290 
2890 


2450 


5160 
4750 


3980 


5320 
4880 


3960 


5300 
4860 


Input Area 
Master-File Block 
Master Record 


PASSl (blocked) 




2450 




2450 




2480 




2480 




2580 




2550 


Input Area 
Master-File Block 


RNUNLD (blocked) 




2320 




2320 




2340 




2340 




2450 




2430 


Organized-File Block (master or 
trailer) Output Block (disk or tape) 


CSADD (blocked) 
CSADD (unblocked) 


2260 


3270 
2960 


2650 


4270 
3120 


2290 


3280 
2970 


2680 


4280 
3130 


2790 


4440 
3250 


2760 


4430 
3240 


Input Area 
Main-File Block 
Additions-File Block 


CSLOAD (blocked) 




2870 




2930 




2910 




2970 




3050 




3010 


Input Area 
Main-File Block 


CSUNLD (blocked) 
Stripped Merge 
Relocated Merge 
Two-Pass Merge 




2610 
2940 
2910 




2590 
2910 
2880 




2610 
2950 
2920 




2590 
2920 
2890 




2690 
3050 
3050 




2690 
3040 
3040 


Main-File Block 
Additions-File Block 
Output-File Block (disk or tape) 


TRADD (blocked) 




3210 




4250 




3210 




4250 




4350 




4350 


Input Area 

The larger of: 
Master-File Block 
Trailer-File Block 



Figure 13. Significant Generated Program Sizes 
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Tape Files 

Magnetic tape can be used as input to the load and 
additions programs and for output of the unload pro- 
grams. Output of non-home records by PASSl can also 
be on tape. All tape files must consist of fixed-length 
records. There can be as many as 70 records per block. 
As with disk input/output blocks, the maximum allow- 
able block length depends on the core storage avail- 
able (see Block Length under Disk Files). Incomplete 
output tape blocks are always padded with blanks. 
The padding character on tape input is specified in the 
iNPUTMEDiA card. 

When an end-of-reel condition is reached and an 
alternate tape unit is specified ( by operand ALTTAPE 
in SYSTEMSPEC Card), the change to the alternate unit 
is made automatically. If there is no alternate unit, a 
halt occurs to allow the operator to change the reel. 
These programs perform all tape operations on the 
following units: 

1401 and 1460 Programs: 
Input: First unit — 2 

Alternate unit — 3 
Output: First unit — 4 

Alternate unit — 5 

Dump Option (Output of Error Blocks) — 6 
1440 Programs: 

Input: First unit — 1 

Alternate unit — 2 

Output: First unit — 1 

Alternate unit — 2 
Dump Option (Output of Error Blocks) — 2 

The following programs accept input from magnetic 

tape: 

PASSl, PASS2, and CSLOAD. Input to these pro- 
grams can be either a single- or multiple-reel file. 

RNADD, TRADD, and CSADD. In a 4K system, in- 
put to these programs must be single-reel tape files. 
In an 8K or larger system, either a single- or multi- 
ple-reel file can be used. 

The PASSl, RNUNLD, and CSUNLD programs can 
write single- or multiple-reel tape output. PASSl is the 
only program that can have tape input and output. 

Note. In 1440 programs, if tape input to PASSl and the 
RECONTAPE nonhome option is specified, the nonhome rec- 
ords are written on unit 2. If card or disk input to PASSl, the 
nonhome records are written on unit 1. Do not make the mis- 
take of caUing for more tape operations than are possible in the 
object system. For example, in a single drive system, tape input 
to PASSl would preclude the possibility of either the RECON- 
TAPE nonhome option or the DUMP tape-error option. 



Tape Labels 

All tape processing in these programs is performed by 
IOCS routines. Files can be labeled or unlabeled and, 
if labeled, can have: 

1. Standard 120-character labels (Type A) 

2. Standard 80-character labels (Type B) 

3. Standard 84-character labels (Type C) 

4. Nonstandard labels 

Either of the following publications may be referred 
to for complete details about the formats of the three 
types of standard tape label and the processing tech- 
niques used: 

1. Input/Output Control System (on Disk) for ibm 
1401/1640: Specifications, C24-1489. 

2. Input/Output Control System for ibm 1440: Speci- 
fications, C24-3011. 

The entries in the inputmedia and unldmedia cards 
determine whether header and trailer labels are to be 
processed and, if so, the extent of checking to be per- 
formed. 

Exits are provided in IOCS for the user to insert his 
own routines for checking nonstandard labels. 

Note. If non-homes are written on tape, they are in the 
following format : 

If tape input to PASSl has standard labels and the 
RECONTAPE option is chosen on the non-homes card, the 
non-homes output tape has type B (80-character) header label(s) 
and corresponding trailer label(s). The header label(s) contains 
PASS2NONHM in the file-identification field and a retention 
period of one (1) day (-001b). The trailer label contains a label 
identifier (lEORb or lEOFb) and the block count. A tape mark 
does not follow the header label. 

If tape input to PASSl has nonstandard labels or no labels, or 
if input was from cards or disk, the non-homes output tape has 
the same blocking factor as the master file, without labels. A 
tape mark is written for an end-of-reel or end-of-file condition. 



Standard input Header Labels 

With the exception of PASS2, if standard labels (A, 
B, or C) are specified in the inputmedia card, a tape 
RDLiN card must be inserted in the program deck at 
object time. If standard label tape is input to PASS2, 
it is not necessary to provide a rdlin card. 

The standard header label checking performed on 
input tape files consists of a comparison between cer- 
tain fields in the rdlin card and the corresponding 
fields in the header label on the tape files. The com- 
parison is made using either the file-identification field 
only or each of the fields specified in the tape rdlin 
card. (In complete label checking of multi-reel files, a 
one (1) is added to the reel sequence number for each 
subsequent reel.) 
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PASS2 automatically supplies the RDLIN informa- 
tion for checking standard input tape header labels. 
The file identification field, only, is checked. If unequal 
comparison results in standard label checking, the pro- 
gram halts, allowing the user to replace the tape reel, 
if desired. 



Standard Output Header Labels 

The labeling of the tape output from PASSl is deter- 
mined by the input. For the CSUNLD and RNUNLD 
routines, an unldmedia card specifies the kind of labels 
to be written on the output file. If standard labels (A, 
B, or C) are specified, a tape rdlin card must be 
inserted in the program deck at object time. Informa- 
tion from the rdlin card is written on the header label 
on all reels of a tape file. For multi-reel files, the reel 
sequence number is increased by one (1) for each sub- 
sequent header label. 

Before a standard header label on an output tape 
is written, the eflFective dates in the old header are 
checked to ensure that the data on the output tape is 
no longer active and may be destroyed. If the reten- 
tion period has not elapsed, a programmed halt occurs 
so that the tape may be changed (if desired). When 
standard labels are processed, a date card must be 
loaded into storage at object time so that the retention 
cycle checking can be performed. This card is punched 
as for 1311 disk output checking (see Disk Output 
Header Labels). 



Standard Input Trailer Labels 

If standard labels (A, B, or C) are specified in the 
iNPUTMEDiA card, IOCS checks and writes correspond- 
ing trailer labels. Two fields on the standard trailer 
label are checked. The labels are checked for an end- 
of-reel or end-of-file condition. Also, a count of the 
number of blocks processed, which was accumulated 
automatically by IOCS, is compared with the block 
count recorded on the trailer label. If an error is de- 
tected in checking, a programmed halt occurs. 



Standard Output Trailer Labels 

Trailer labels are written for PASSl output if the 
INPUTMEDIA card indicated standard label input. If 
standard labels are specified in the unldmedia card, 
trailer labels are written for tape output of CSUNLD 
and RNUNLD. An end-of-reel (FOR) or end-of-file 
(EOF) indication is written. IOCS writes the accumu- 
lated block count in the block-count field of the trailer 
label. Blanks are written in the remaining fields. 



Nonstandard Input Labels 

If nonstandard labels are specified in the inputmedia 
card, the programmer must provide his own symbolic 
routines (which are placed in the source deck after 
the parameter cards), to read and check header and 
trailer labels. IOCS exits 6 and 7 are generated auto- 
matically in the programs for this purpose. 

Exit 7 permits reading and checking of nonstandard 
input header labels. The user, in his routine, must pro- 
vide his own area for entering the header information 
and must program to read and check the information. 
The first instruction of the user's routine must be 
labeled TEXIT7 and the last instruction must return 
control to the main program by branching to lOCSRE. 

Exit 6 permits reading and checking nonstandard 
input trailer labels. The user must provide, in his rou- 
tine, his own area for entering the trailer information, 
and he must program to read and check the informa- 
tion. The first instruction of the user's routine must be 
labeled TEXIT6. Control is returned to the main pro- 
gram by branching to lOCSRE on an end-of-reel con- 
dition and to TAPEND on end-of-file. 

The block count is accumulated automatically and 
is available to the user whenever exit 6 is used. The 
count is in a 5-position field identified in the assembly 
listing by the following label: 



1401/1460 Package 
IOC2BK 



14^ Package 
lOClBK 



Nonstandard Output Labels 

If nonstandard labels are specified in the unldmedl^. 
card, the programmer must provide his own symbolic 
routines (which are placed in the source deck after the 
parameter cards) to build and write header and trailer 
labels. IOCS exits 2 and 5 are automatically generated 
in the programs for this purpose. 

Exit 5 is used to build and write nonstandard output 
header labels and to read and check the old header on 
an output tape. The user must program the checking 
procedure for the old header. His routine must provide 
its own area for building the new header information 
and the instructions to write the new header on tape. 
The first instruction of the user's routine must be la- 
beled TEXIT5, and the last instruction must return 
control to the main program by branching to lOCSRE. 

Exit 2 is used to build and write nonstandard out- 
put trailers. The user must provide his own area for 
building the trailer information and must program 
to write the trailer label on tape. IOCS provides the 
user with an indication of whether the trailer is to 
be written for an FOR (end-of-reel) or FOJ (end-of- 
job) condition. If FOR, there is no word mark in a 
location labeled TPCLSW. If FOJ, TPCLSW contains 
a word mark. The first instruction of the user's routine 
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must be labeled TEXIT2, and the last instruction must 
return control to the main program by branching to 
lOCSRE. 

The block count is accumulated automatically and 
is available to the user whenever exit 2 is used. The 
count is in a 5-position field identified in the assembly 
listing by the following label: 



1401/1460 Package 
IOC4BK 



1440 Package 
lOClBK, or 
IOC2BK, for nonhome 
count if tape input and 
output. 

The user's tape exit routines must follow immedi- 
ately after the parameter cards in the source deck and 
must be followed by a ltorg card with an asterisk in 
the operand field. 

Tope RDLIN Cards 

A tape RDLIN card must be placed in the program deck 
at object time if a tape file with standard labels is to 
be processed by the program. The bdlin card contains 
an identification field in columns 1-5 to indicate 
whether the tape file is an input or output file. Other 
data in the card must correspond to the fields of the 
particular standard label that will be checked or writ- 
ten on the tape file. 

The reel sequence number is automatically increased 
by one (1) for every reel after the first in a multi-reel 
file. All other parts of the header label should be iden- 
tical on all reels of an input tape file and will be writ- 
ten identically on an output file. 

A RDLIN card does not have to be supplied for tape 
output of PASSl or tape input to PASS2. These pro- 
grams automatically supply RDLIN information for 
reading and checking standard labels. 

The format of the rdlest card associated with each 
of the three kinds of standard header labels is as fol- 
lows: 

RDLIN card for Type A (120-character) standard 
header label (fields 9-19 are not processed): 
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Columns 


Contents 


Header-Label 
Field Number 


1-5 


TAPEI - (for tape input 
to PASSl, RNADD, 
TRADD, CSLOAD 
and CSADD) 
TAPEO - (for 
tape output of 
CSUNLD and RNUNLD; 


) 


16-20 


RDLIN 




21-24 


Retention Period 


2 


25-29 


Creation Date 


3 


30-39 


File Identification 


4 


File Org. Sp 


'ecs 





Columns 


Contents 


Header-Label 
Field Number 


40-44 


File Serial Number 


5 


45-48 


Reel Sequence Number 


7 



RDLIN card for Type B (80-character) standard 
header label: 



Columns 


Contents 


Header-Label 
Field Number 


1-5 


TAPEI - (for tape input 
toPASSl, RNADD, 
TRADD, CSLOAD, 
and CSADD) 
TAPEO - (for 
tape output of 
CSUNLD and 
RNUNLD) 




16-20 


RDLIN 




21-25 


File Serial Number 


3 


26 


— (minus sign) 


4 


27-29 


Reel Sequence Number 


4 


30 


blank 


4 


31-40 


File Identification 


5 


41-45 


Creation Date 


6 


46 


— (minus sign) 


7 


47-49 


Retention Period 


7 


50 


blank 


. 7 



RDLIN card for Type C (84-character) standard 
header label: 



Columns 


Contents 


Header-Label 
Field Number 


1-5 


TAPEI - (for tape input 
to PASSl, RNADD, 
TRADD, CSLOAD, 
and CSADD) 
TAPEO - (for 
tape output of 
CSUNLD and RNUNLD; 


) 


16-20 


RDLIN 




21 


blank 


3 


22-26 


File Serial Number 


3 


27 


blank 


4 


28-31 


Reel Sequence Number 


4 


32 


blank 


4 


33-34 


Creation Dat?: Year 


5 


35 


blank 


5 


36-38 


Creation Date: Day 


5 


39-41 


blank 


6 


42-44 


Retention Period 


6 


45-50 


Label Information: 
blank 
Density 

Character Coding 
Checksum 
Block Sequence 
Checkpoint Record 


7 


51-68 


File Identification 


8 



Label Checking 

The following outlines the header-label operations per- 
formed by each of the programs if called for in the 
parameter cards. Where nonstandard labels are used, 
an exit is provided to the user's routine to perform the 
operation. 

PASSl 

1. Checks header labels of disk or tape input file. 

2. Writes the header labels for the disk master-file 
area and the work tracks preceding it; or, checks 
the header labels if making additions to a uniquely 
addressed file. 

3. Writes the header labels for the disk work areas or 
tape output file used for non-home records or ad- 
dresses. A tape output file is labeled only if there 
was tape input with standard labels. 



2. If performing initial loading in area, writes header 
labels for the disk main-file area, for the distribu- 
tion index area, and the three work tracks preceding 
the main-file area. 

3. If adding records to the end of the disk main-file 
area, the header labels of the disk main-file area and 
the distribution index area are checked. 



CSADD 

1. Checks header labels on disk input-file areas or 
input tape file. 

2. Checks header labels of disk main-file area and 
distribution index area. 

3. If first additions to disk file, writes a header label 
for the additions area. 

4. If adding records to an established additions area, 
the header label of the area is checked. 



PASS2 

1. Checks the header labels of the disk master-file area. 

2. Checks the header labels of all disk input areas 
and/or work areas or tape input files used for non- 
home records or addresses. For tape input, PASS2 
checks labels only if input to PASSl was tape with 
standard labels. Only the file-identification field 
(PASS2NONHM) is checked. 

TRADD 

1. Checks header labels of disk input area or tape 
input file and the master-file area. 

2. If performing initial loading of disk trailer records, 
a header label is written for the trailer area. 

3. If adding trailer records, the header label of the 
disk trailer area is checked. 

RNDEU, RNDEL2, and TRDEL 

1. Checks header labels of disk master file and trailer 
file (if trailers). 

RNUNLD 

1. Checks header labels on disk master or trailer area. 

2. Writes header labels for disk output-file areas or 
tape output file. 

CSLOAD 

1. Checks header labels on disk input-file areas or in- 
put tape file. 



CSDELl 

1. Checks header labels of the disk main-file area and 
the additions area (if separate additions area). 

2. Checks header label of distribution-index area. 

CSDEL2 

1. Checks header labels of the disk main-file area and 
the additions area (if separate additions area). 

CSUNLD 

1. Checks header labels of disk main-file area and 
additions area. 

2. Writes header la^bels lor output disk areas or output 
tape file. 

3. Writes header labels for distribution index and work 
tracks, if reorganized output. 



Card Files 

Card Input to Load and Additions Programs 

If input to the load and additions program is from 
cards, the user can either supply his own subroutine 
to assemble the disk records, or he can let the file- 
organization program assemble them. 

Regardless of whether the user supplies a subrou- 
tine to assemble disk records, the last data card must 
be followed by a card with the entry, ENDCD, 
punched in columns 1-5. 
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identification 
Number 

(Not Part of 
Control Data) 



8 9-1011 



70 Characters of the Record to be Stored 



80 



Figure 14. Format of the Input Card 



Records Assembled by File-Organization Programs 

If the file organization programs are to do the assem- 
bling, the records must be in the format shown in Fig- 
ure 14. Each card within a record must contain the 
same identification number in columns 1-8. Note that 
this identification number is not considered to be the 
control data of the record. The control data is con- 
tained within the data portion of the record. Columns 
1-8 can contain any value (including all blanks) as 
long as the same value is repeated in each card of 
a record. The number need not be unique for each 
record. 

All cards composing one record must have sequence 
numbers beginning with 01 punched in columns 9 
and 10. 

The actual data that makes up the record is punched 
in columns 11-80. Thus each card can contain 70 char- 
acters of a record. A record can consist of up to 98 
cards. All records within a particular file must be the 
same length. 

Both the loading and additions programs examine 
the identification and sequence numbers to ensure that 
the correct record is written in the proper sequence. If 
a record contains an incorrect number of cards, an 
incorrect identification number, or if the cards of a 
record are out of sequence, the program prints an 
error message indicating the identification and se- 
quence number of the erroneous card. The program 
then halts or bypasses the record, depending upon 
the user's choice of the operands HALT or BYPASS in 
the iNPUTMEDiA card. 



Records Assembled by User's Subroutine 

If the user supplies a subroutine to assemble the disk 
records, a core-storage work area is generated by 
means of the following statements taken from the file- 
organization library routines: 



RECBEG 
RECEND 



DA 



IxU 
1,U 



U equals the length of the user's- input-data record 
and is taken from the value punched in the inpmas- 
TREC card. The work area has no word marks other 
than the one in the high-order position. 

The following card-read routine is generated in each 
of the load and additions programs. The routine reads 
each input card and checks for the last card, which 
must have ENDCD in columns 1-5. 



REAERR 


.7 




(Note 1) 


INPUT 


R 




(Note 2) 




BIN 


REAERR, ? 






SS 




(Note 3) 




c 


5, KENDCD 






c 




(Note 4) 




c 








c 








c 








BE 


END 






B 


ASMBLE 






DCW 


@E@ 






DCW 


@N@ 






DCW 


@D@ 






DCW 


@C@ 




KENDCD 


DCW 


@D@ 




PROCES 


• • • 


• ■ . • 
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Note 1. With the exception of those halts generated from 
IOCS, all halts in these object programs are 2-character halts, 
with the alphabetic character appearing in the A-register for 
halt identification. 

Note 2. When reading from a 1442, this instruction includes 
the operand 1, 1. 

Note 3. This instruction is not included if reading from a 
Model 1 of the 1442 that does not have the selective stacker 
feature. If two stackers are available on a 1442, the instruction 
is included with the operand 2, When reading from a 1402, the 
instruction is always included with the operand 1. 

Note 4. This compare operation is chained to allow word 
marks in any position of the read-in area. The following ex- 
plains how this compare works. 

There is one latch used for equal-unequal compare. This 
latch being on indicates an equal condition, while unequal is 
indicated by the latch being off. The equal-unequal latch is 
turned on at 1-2 time of a compare operation and then left on 
if the characters compared are equal, or turned off if they are 
unequal. This compare is during the B-cycle. 

The full-chained compare used here will turn the latch on 
during the first compare only, as this is the only time the ma- 
chine will get to 1-2. If any of the characters compared are 
unequal, the latch will be turned off and remain off. If all five 
characters are equal, the latch will remain on. Therefore, a 
complete compare is accomplished. 

The program reads a card into core-storage posi- 
tions 1-80. (Position 81 contains a group-mark with 
word-mark.) If no error occurs, the routine branches to 
ASMBLE, which must be the label o£ the first instruc- 
tion in the user's assembly routine. The assembly rou- 
tine can then select any fields from 1-80 and move 
them to the defined area RECBEG. To facilitate field 
selection, the assembly routine can set word marks in 
the read-in area. No additional word marks may be 
set in the area labeled RECBEG. The assembly rou- 
tine then determines whether more cards are required 
for the record. On the basis of this decision, it either 
branches to INPUT or, if the entire record has been 
assembled, to PROCES, thus returning control to the 
file-organization program. 

In the event of a read error (REAERR), the pro- 
gram halts. The user can correct the cause of the error 
and press start to continue. 

The user's assembly routine, in symbolic form, is 
loaded with the parameter cards. It is suggested that 
all labels other than ASMBLE be started with ZZ to 
avoid multiply defined symbols. 

Note 1. The user's assembly routine must not use the move 
RECORD (mrcm) instruction to move data from the input area to 
RECBEG. This instruction moves the group mark along with 
the data, and this position was not defined in the da statement 
shown above. 

Note 2. When a record is displaced by RNADD, it is held 
temporarily in the area labeled RECBEG. The area is not 
cleared before branching to process the next record. 

Card Output from the Unload Programs 

The card output produced by RNUNLD and CS- 
UNLD is discussed under the separate descriptions of 
those programs. 



Program Exits 

Exits are provided in each of the file-organization ob- 
ject programs. With one exception explained below 
(EXITS), these exits are used to branch to the user's 
subroutines. If tape input or output files are used with 
nonstandard labels, exits are automatically generated 
by IOCS. These exits are branches to routines (re- 
ferred to as TEXIT routines) supplied by the user to 
process the nonstandard labels. See Tape Labels for a 
discussion of the TEXIT routines. 

In addition to the nonstandard-label routine exits, 
three exits can be generated from the file organization 
routines. These are optional exits, called for in the 
EXITS parameter card by the parameters: EXITl, 
EXIT2, and EXITS. 

Exit 3 is available in all object programs. This exit 
is different from the others in that it does not cause a 
branch to a user subroutine. Instead, the program 
reads another card and branches to 001 at end-of-job. 
In this way, these programs can read in, and branch 
to, the first instruction of another loader program. 

Each of the other two exits is generated as a branch to 
a user subroutine. The user supplies these subroutines 
in symbolic source language and they are assembled 
along with the file-organization object program. The 
user's routines are identified by the label (EXITl or 
EXIT2) of the first instruction in each. The EXITl 
routine returns control to the main program by branch- 
ing to ENTRYl; the EXIT2 routine returns to 
ENTRY2. 

The following points must be considered when writ- 
ing all user subroutines: 

1. During operation of these programs, portions of 
the programs are written in the reserved tracks 
preceding the master-file area and are overlaid by 
other portions. Therefore, any word marks asso- 
ciated with group marks in the user's routines must 
be set and cleared by the user's routine. 

2. When TEXIT routines are used, they must be 
placed immediately after the parameter cards and 
before any other subroutines. They must be fol- 
lowed by a literal origin (LTORG) card with an 
asterisk in column 21. With that single exception, 
the user's routines must not include any of the 
following statements: 

EX — Execute 
INCLD — Include 
LTORG — Literal Origin 
XFR — Transfer' 

END — End of Assembly (except for the END START card 
after the last card in the source deck) 

S. If a subroutine uses index registers, it must first 
save the contents of the registers and restore them 
before returning control to the main program. 
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4. The first card in the first symboKc subroutine sup- 
phed by the user must not be a comments card. 

The following explains the points at which exits 1 
and 2 occur in the object programs. Figure 15 lists 
certain labels that may be useful in the user's sub- 
routines. See Block Len^h under Input/Output Files 
for a discussion of the core-storage space available for 
subroutines. 

PASSl 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 
This exit is not available if the user supplies an 
assembly routine for card input. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. The exit does not 
occur after processing non-home records. 

PASS2 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. 

RNADD 

Exit 1 occurs after assembhng the input record and 
before extracting the control data for conversion. 

Exit 2 occurs after writing the output record and be- 
fore performing the audit print. 

TRADD 

Exit 1 occurs after assembling the input record and 
before extracting the control data for conversion. 
This exit is not available if the user supplies an as- 
sembly routine for card input. 

Exit 2 — not available. 



RNDELl 

Exit 1 — not available. 

Exit 2 occurs after reading the master record to be 
deleted or tagged and before performing the audit 
print. The record has not been deleted or tagged 
but has been verified as the correct record. 



RNDEL2 

Exit 1 — not available. 



Exit 2 occurs each time a tagged master record is 
found. The record has not been deleted but has been 
verified as a tagged record. The program does not 
recheck for the tag zone after the exit. There is no 
exit after reading the tagged trailer records. 

TRDEL 

Exit 1 — not available. 

Exit 2 — occurs after reading the trailer record to be 
deleted and before performing the audit print. The 
record has not been deleted but has been verified as 
the correct record. 



RNUNLD 

Exit 1 occurs after reading each input record (master 
or trailer) and before processing the record. 

Exit 2 — not available. 



CSLOAD 

Exit 1 occurs after assembling the input record and 
before checking the record for sequence. 

Exit 2 occurs after moving the record to the output 
area and before performing the audit print. The out- 
put record has not been written. 



CSADD 

Exit 1 occurs after assembling the input record and 
before checking the record for sequence. 

Exit 2 occurs after writing the new record and after 
establishing the sequence linkage, but before the 
audit print. 

CSDEll 

Exit 1 — not available. 

Exit 2 occurs after reading the record that is to be 
deleted or tagged and before performing the audit 
print. The record has not been deleted or tagged 
but has been verified as the correct record. 



CSDEL2 

Exit 1 — not available. 

Exit 2 occurs each time a tagged record is found. The 
record has not been deleted but has been verified 
as a tagged record. The program does not recheck 
for the tag zone after the exit. 
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CSUNLD 

Exit 1 — available only in a 2-pass unload. The exit 
occurs during the first pass, after moving the input 
record to the output area, but before writing the 
output block in the work area. 

Exit 2 — available with all three kinds of output. The 
exit occurs after moving the record to the output 
area and before the audit print. The output block 
has not been written. In a 2-pass program, this oc- 
curs during the second pass, before writing the 
record from the merged file back into the original 
file area. 

Note. The DMPADR labels in Figure 15 are used to modify 
the record in the output area. This can be done in Exit 1 
of a 2-pass program or in Exit 2 of a relocate or strip pro- 
gram. No label is provided to reach the output record dur- 
ing the second pass of a 2-pass program. 
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Label 


Programs and Conditions for 
Presence of Label 


Core-Storage Field or Area Referenced 


RECEND 


All load and additions programs and 
RNUNLD. 


In the load and additions programs, this label refers to the last (low-order) position 
of the input record, if a terminal record mark is present on input, it has been 
stripped off. No overflow-address, sequence-link, availability indicator, or output 
record mark has been appended. 

In RNUNLD, this is the last position of the input disk record. Thus, it is the term- 
inal record mark, if RMIN. If NORMIN, it is the availability-indicator position of 
a master record or the last data character of a trailer record. 


RECBEG 
INAREA 
TAPEIN 


All load and additions programs, if 
card input. 

All load and additions programs, if 
disk input. 

All load and additions programs, if 
tape input. 


These three labels are used to refer to the first (high -order) position of the input 
record. If new input, this is the first position in the data record. No sequence-link 
or trailer-address fields have been appended. If reorganized disk or tape input, the 
label refers to the tag-zone position appended to the front of the input record. 


PRINT 


Defined in all programs. 


In all programs, a DA statement is used to define the print area. This label refere to 
the first (high-order) position of the area. The print area always begins in position 
201. 


CONTD 


Defined in all random programs except 
RNUNLD with no converted-address 
output. 


The control data of each record is extracted (before exit 2) in the order defined in 
the MASTCONTRL card and placed in this field. The label refers to the last (low- 
order) position of ihe field. 


CONVl 


All random programs except RNUNLD 
with no converted-address output. 


This field contains the converted disk address of the record being processed. The 
address is available during exit 2. 


WORKN 


PASS2 and RNADD 


This is the label of a 6- or 7-digit field that contoins the actual disk address used to 
write Hie record. The address is available during exit 2. 


FILLOC 


CSDELl, if blocked file and no index 
registers . 


This is the label of a three -position field that contains the core-storage address of 
the last (low-order) position of the sequence-link field of the record being deleted 
or tagged. 


CHEKl-KS 


CSDEL2, if blocked file and no index 
registers . 


This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the last (low-order) position of the sequence- 
link field of the record being deleted. 


DATA 


CSDELl andCSDEL2, if blocked file 
and index registers, or if unblocked 
file. 


This is the label of the last Oow-order) position of the data record being deleted. 
Note: This is the last data character, not the sequence-link field. 


CL2-t6 


RNDELl, if delete. 
RNDEL2, always. 


This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the availability-indicator position of the 
master record being deleted. 


TAG+6 


RNDELl, if tag. 


This is the character-adjusted label of the B-address of an instruction. The B- 
oddress is the core-storage address of the availability-indicator position of the 
master record being tagged . 


CLEART^^ 


TRDEL 


This is the character -ad jus ted label of the B-address of an instruction. The B- 
address is the core-storage address of the last (low-order) position in the trailer 
record being deleted. 


DMPADR+3 


CSUNLD- Stripped disk or tape output 
only, with NORMOUT. 


This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the last character in the record being unloaded. 


DMPADR-4 


CSUNLD- 

Two-poss program, if NORMOUT . 
Relocate program, if NORMOUT. 
Strip program, if RMOUT (not for 
card output) , 


This is the character-adjusted label of the B-address of an instruction. In either a 
two-pass or relocating reorganization program, the B-address is the core-storage 
address of the last position in the sequence-link field of the record being processed. 
In a program that produces stripped output, the address is that of the record mark. 


DMPADR-5 


CSUNLD 

Two-pass program or relocate 

program, only if RMOUT. 


This is the character-adjusted label of the B-address of an instruction. The B- 
address is the core-storage address of the terminal record mark. 



Figure 15. Labels Used by Exit Routines 
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Parameter Cards 



The disk file-organization routines packages as sup- 
plied by IBM include special prephases for the corre- 
sponding Autocoder processor programs and 17 library 
routines. The object programs are generated from 
these library routines by means of an Autocoder assem- 
bly run. The file-organization prephase of Autocoder 
reads a series of parameter cards punched by the user 
and, from these, builds a parameter table. The macro 
generator of Autocoder then uses this table to select 
and tailor a symbolic program from the file-organiza- 
tion routines and from certain IOCS library routines. 
Any symbolic subroutines supplied by the user are 
then read and assembled along with the file-organiza- 
tion program. The output is an assembled object deck, 
ready to be used to operate on the file for which it 
was generated. 

Although these programs are produced by the macro 
generator portion of the Autocoder, it must be under- 
stood that they are not macros in the conventional 
sense. They cannot be used as subroutines with other 
programs, nor can more than one program be gener- 
ated and used concurrently during any particular run. 

The parameter cards required for these programs 
are shown in Figure 17. The cards are to be punched 
in the regular Autocoder format, with the label in 
columns 6-15 and the parameters, separated by com- 
mas, starting in column 21. 

The following checks are performed on the operand 
portion on each parameter card: 

1. The first four characters of alphabetic parameters 
are checked for misspelling. 

2. The @ symbols must not appear in any operand. 

3. Operands may not be greater than 11 characters. 

4. There can be no zone bits in numeric operands. 

5. The operands are checked for too many parameters. 

6. All parameters must appear in the prescribed order. 

7. When a parameter is indicated as necessary (in 
Figure 17 under Condition for Including Param- 
eter), the parameter must not be left out unless it, 
and all following parameters, are NO parameters. 
When the condition for including the parameter 
does not apply (for example, the parameter speci- 
fying type of disk unit if card or tape input in 
INPUTMEDIA card), simply leave the parameter 
out. Double commas are never used to show the 
commission of a parameter. 



Example: The following two sets of parameters 
in the operand of the EXITS card are considered to 
be the same: 

EXITl, EXIT2, NOEXIT3 or 

EXITl, EXIT2 

However, an error is detected if the card is 
punched: 

EXITl, ,EXIT3 



Note: The SYSTEMSPEC, EXITS, and LOADAUDIT pa- 
rameter cards may be omitted from the source desk if all 
parameters are to be NO. All other parameter cards required 
must be supplied, regardless of parameters. This includes the 
INLABELS and OUTLABELS cards, even when using 1301 
disk storage. 



It is recommended that the NO parameters be in- 
cluded to provide more easily understood documen- 
tation of the programs. 



Numeric parameters are processed from right to 
left. Zeros are inserted in missing digit positions, and 
excess numbers are dropped from the left (high-order) 
end of entry. For example, if a 2 were punched for 
a parameter that required a 2-digit number, the pre- 
phase would insert the high-order zero, resulting in 
02. If 1234 were punched for the same 2-digit param- 
eter, the prephase would drop the two high-order 
positions, resulting in 34, 

The parameter cards are preceded by a card with 
the entry FILE in the operation-code portion of the 
card (columns 16-19). When Autocoder reads this 
card, it calls in the file-organization prephase, which 
reads the parameter cards. 

The first parameter card must be the routine card. 
The other cards required for a program can be entered 
in any order. 

The user's symbolic deck must be followed by a 
card with the entry END in columns 16-18 and START 
in columns 21-25. This card follows any subroutines 
being used with the file-organization programs (con- 
version, card assembly, and exit routines). Unless 
batched assemblies are being performed, the END 
card is followed by a card with HALT in columns 
16-19. Figure 16 shows the makeup of the source deck. 
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HALT 



END START 



X- ---_--_- _--7iJ 



Yn/ 

User's Symbolic I M 



Subroutines 



File Organization 
Parameter Cards 



FILE 



ly 



r 



CTL 

Autocoder Control 



n 



JOB 



AUTOCODER RUN 
THRU OUTPUT 



Autocoder 

Bootstrap 

Routine 



[ I Required 

I {Optional 



Figure 16. Source Deck to Generate Object Programs 
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Summary of Parameter Cards Required 

The following summary lists the parameter cards 
used in generating each of the 13 types of object pro- 
grams. 

Parameter Cards for PASS1 and PASS2 



ROUTINE 

SYSTEMSPEC (optional) 

DISKDRIVES 

EXITS (optional) 

TYPEINPUT 

INPUTMEDIA 

INPMASTREC 

MASTCONTRL 

MASTBLOCK 



MASTLIMITS 
ADDRESSING 
LOADAUDIT (optional) 
NONHOMES 

(if duplicate addressing) 

TYPERNUNLD 
(if reorganized) 

INLABELS (if disk input) 
OUTLABELS 



Parameter Cards for RNADD 



ROUTINE 

SYSTEMSPEC (optional) 

DISKDRIVES 

EXITS (optional) 

INPUTMEDIA 

INPMASTREC 

MASTCONTRL 



MASTBLOCK 
MASTLIMITS 
ADDRESSING 
LOADAUDIT (optional) 
INLABELS (if disk input) 
OUTLABELS 



Parameter Cards for TRADD 



ROUTINE 

SYSTEMSPEC (optional) 

DISKDRIVES 

EXITS (optional) 

TYPEINPUT 

INPUTMEDIA 

INPMASTREC 

MASTCONTRL 

MASTBLOCK 



MASTLIMITS 
ADDRESSING 
TRAILENGTH 
TRAILCNTRL 
TRAILBLOCK 
TYPERNUNLD 
(if reorganized) 

INLABELS (if disk input) 
OUTLABELS 



Parameter Cards for RNDEL1 and RNDEL2 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
INPMASTREC 
MASTCONTRL 
MASTBLOCK 
MASTLIMITS 



ADDRESSING 

TRAILENGTH 

TRAILCNTRL 

TRAILBLOCK 

LOADAUDIT (optional) 

TYPEDELETE 

INLABELS 



if trailers 



Parameter Cards for TRDEL 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
INPMASTREC 
MASTCONTROL 



ADDRESSING 

TRAILENGTH 

TRAILCNTRL 

MINORCNTRL 

TRAILBLOCK 

TYPEDELETE 



MASTBLOCK 
MASTLIMITS 



INLABELS 



Parameter Cards for RNUNLD 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
INPMASTREC 
MASTCONTRL 
MASTBLOCK 
MASTLIMITS 



(if unloading 
trailer file) 



ADDRESSING 

TRAILENGTH 

TRAILCNTRL 

TRAILBLOCK 

TYPERNUNLD 

UNLDMEDIA 

INLABELS 

OUTLABELS (if disk output) 



Parameter Cards for CSLOAD 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
TYPEINPUT 
INPUTMEDIA 
INPMASTREC 
MASTCONTRL 



MASTBLOCK 

COLLATE 

DISTENTRY 

LOADAUDIT (optional) 

TYPECSUNLD (if reorganized) 

INLABELS (if disk input) 

OUTLABELS 



Parameter Cards for CSADD 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
INPUTMEDIA 
INPMASTREC 



MASTCONTRL 
MASTBLOCK 
COLLATE 

LOADAUDIT (optional) 
INLABELS (if disk input) 
OUTLABELS 



Parameter Cards for CSDEL1 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 
INPMASTREC 



MASTBLOCK 

MASTCONTRL 

COLLATE 

TYPEDELETE 

INLABELS 



Parameter Cards for CSDEL2 



ROUTINE 

SYSTEMSPEC (optional) 
DISKDRIVES 
EXITS (optional) 



INPMASTREC 
MASTBLOCK 
TYPEDELETE 
INLABELS 



Parameter Cards for CSUNLD 



ROUTINE 

SYSTEMSPEC (optional) 

DISKDRIVES 

EXITS (optional) 

INPMASTREC 

MASTCONTRL 

MASTBLOCK 



(if sequence- 
link field is 
retained) 



DISTENTRY 
LOADAUDIT 

(optional) 

TYPECSUNLD 

UNLDMEDIA 

INLABELS 

OUTLABELS (if disk output) 
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Label 


Paramefers and Pasible 
Operands 


Condition for Including 
Parameter 


Valid 
Range 


Operand is Used in Generating 


Explanation 


i 


1 


a 
a 
< 

z 

Of 


Q 


UJ 

o 

z 


CM 
UJ 

a 

z 


m 

a 


Q 

-1 

z 
z 


1 


o 
u 


Q 

u 


UJ 

o 




ROUTINE 


1 . Object Program to be 
generot'ed (one of the 
Following): 

PASSl, PASS2, RNADD, 
TRADD, RNDELl, RNDEL2, 
TRDEL, RNUNLD, CSLOAD, 
CSADD, CSDELl, CSDEL2, 
CSUNLD. 


Always . 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


This must be the first parameter card and immediately follows the FILE cord. 


SYSTEMSPEC 


1 . Direct seek feature: 
DIRECT or NOD IRECT 

2. Console printer: 
CONPRINTor 
NOCONPRINT 

3. Selective stacker feature: 
STACK or NOSTACK 

4. Alternate tape drive: 
ALTTAPE or NOALTTAPE 

5. Tape read error routine: 
ERRORSCAN or DUMP or 
blank 


Always. 
Always. 

A 1 ways . 

Parameters 4 and 5 are checked 
only when the program being 
generated is to process tape 
input or output. The parameters 
can be punched for all programs, 
however, aUowing the same card 
to be used for each program 
generated . 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


If using 131 1 's with the direct seek feature, punch DIRECT. If using ISll's without the direct 
seek feature, punch NODIRECT. If using only 1301's, punch NODIRECT. 

If the object machine has a console printer, punch CONPRINT; if not, punch NOCONPRINT 

If using a 1442 Model 1 without the selective stacker feature, punch NOSTACK. 
Otherwise, punch STACK. 

If multiple-reel tape files are to be read or written on alternate tape drives, punch ALTTAPE. 
If only one tope drive is to be used, punch NOALTTAPE. 

The procedure followed in the event of a permanent tope read error (failed to read after 100 
tries) depends on this parameter. If the operand is: 

0. Blank, the erroneously read tape block is bypassed. 

b. ERRORSCAN, the program halts, allowing the operator to scan core storage for the 
invalid character. 

c. DUMP, the erroneously read tape block is written on another tape drive for later 
investigation. 


DISKDRIVES 


1 . All disk units on line in 
object system: 
0, 2, 4, 6, 8, +0, B, D, 
F, H 


Always. 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


Punch 0, 2, 4, 6, 8 for 1311 disk drives on line. 
Punch +0, B, D, F, H for 1301 modules on line. 


EXITS 


1. Exit after assembling input: 
EXIT! or NOEXITi 

2. Exit after processing output: 
EXIT2or NOEXIT2 

3. Read a card and branch to 
001 at EOJ. 

EXIT3 or NOEXIT3 


Always. 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


This card is optional in all programs . See Program Exits. 


TYPEINPUT 


1 . Type of Input file: 
NEW or REORGANIZED 

2. Home-record-indicator 
check: 

CHECK HOME or blank 


all load programs 

PASSl and PASS2 if 
reorganized. 




X 
X 


X 
X 




X 










X 










If the input file was produced by RNUNLD or CSUNLD, punch REORGANIZED; otherwise, 
punch NEW. 

If the nonhome-record zone-bit indicator is to be checked by PASSl, punch CHECK HOME; 
otherwise, leave blank. 


INPUTMEDjA 
(cont,) 


1. Input media and blocking . 
DISK, X, Yor 

CARD, Xor 
TAPE, X 

2. Type of disk unit. 
11 or 

01 


If disk input. 
If card input . 

If tape input. 

If disk input. 


X= 1-98 
Y= 1-70 

X= 0-98 
X= 1-70 


X 
X 
X 
X 


X 
X 
X 
X 


X 
X 
X 
X 


X 
X 
X 
X 










X 
X 
X 
X 


X 
X 
X 
X 








If disk input, punch DISK, X, Y where X = sectors per block 
Y = records per block . 

If card input, punch CARD, X where X= cards per input record. 
Note. If input records are assembled by user's subroutine, X =0. 

If tape input, punch TAPE, X where X= records per block . 
Note . If tape Input to PASS2, X = 1 . 

If disk input from 131 1 disk storage, punch 1 1 . 
if disk input from 1301 disk storage, punch 01. 
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fe 



INPUTMEDIA 


3 . Card read-error procedure . 
HALT or 

BYPASS 

4. Tape padding character. 
Zor 

BLANK 

5. Tape labels . 

NOLABEL, Y or 
NONSTANDARD or 
STANDARD, A 
STANDARD, B 
STANDARD, C 

6. Tape mark following header 
labels. 

TPMRK or 
NOTPMRK 

7. Extent of tape-label 
checking. 

ALL or 
IDENT 


Only If sard input. Not used if 
records are assembled by user's 
subroutine . 

Only if tape input. 
Only if tape input. 

Only if standard labels. 
Not used for PAS S2. 

Chly if standard labels. 
Nat used for PASS2. 


Y= 1-98 


X 

X 
X 

X 
X 


X 

X 
X 


X 

X 
X 

X 
X 


X 

X 
X 

X 
X 










X 

X 
X 

X 
X 


X 

X 
X 

X 
X 








1 

If a record contains an incorrect number of cards, on incorrect Identification number, or if the 
cards of a record ore out of sequence, the program prints an error message indicating the 
identification and sequence number of the en-oneous card. The program then halts or bypasses 
the record, depending on this parameter. 

If blocked tape input, punch the padding character. If unblocked tape input or if the padding 
character is blank, punch the word BLANK . 
Note . If tape input to PASS2, punch BLANK . 

If the input tape has: 

a. No labels, punch NOLABEL, Y where Y = the number of reels to be read. 

b. Nonstandard labels, punch NONSTANDARD. 

c. Standard 120-character labels, punch STANDARD, A. 

d. Standard 80-character labels, punch STANDARD, B. 

e. Standard 84-character labels, punch STANDARD, C. 

If a tape mark follows standard tape header labels, punch TPMRK; If not, punch NOTPMRK 
Note . Type-A labels must be followed by tape marks. 

The extent of header label checking performed depends on this parameter. 
ALL - All fields in tape RDLIN card ore checked. (See Tape RDLIN Cards.) 
IDENT - Only the file-identification field is checked. 


INPAAASTREC 


1 . Input master record length. 

X 

2. Terminal record mark on 
input master record. 

RMIN or 
NORMIN 

3. Terminal record mark on 
output master and trailer 
records . 

RMOUT or 
NORMOUT 


Always. 

Always. 
Always 


Random: 

1-9799 

(unblocked) 

1-4899 

(blocked) 

Control 

Sequential 

13-9794 

(unblocked) 

14-4893 

(blocked) 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


When initially loading a file with PASSl, PASS2, or CSLOAD, and when mdting additions 
with RNADD or CSADD, X equals the actual length of the input record, including input 
terminal record marks. This count does not include fields added by the program such as trailer- 
address field, sequence-link field, or terminal record marks. 

When loading a reorganized file with PASSl, PASS2, or CSLOAD, X equals the actual l•ng^^ 
of the records produced by the unload program. This includes all appended fields such as 
trailer-address and converted-disk-address fields, the tag-zone position, and teminal record 
marks. (This value appears in the assembly listing of RNUNLD and CSUNLD in a DCW field 
labeled OUTL.) 

When generating TRADD and each of the delete and unload programs, X equals the length 
of the disk record in the organized master or main file, including all appended fields and 
terminal record marks. (This value appears in the assembly listing of PASSl and CSLOAD in 
a field labeled DISKL.) 

If Input master dafo records have terminal record marks, punch RMIN; if not, punch NORMIN. 
For TRADD and all delete and unload programs, this parameter applies to the organized master 
or main file. 

If terminal record marks are to be written at the end of all output records, punch RMOUT; if 
not, punch NORMOUT. To generate TRADD and all delete programs, these parametera must 

be either: 

RMIN, RMOUT or 
NORMIN, NORMOUT, 


MASTCONTRL 


1 . Position and length of first 
segment of control field. 

X,Y 

2. Position and length of second 
segment of control field . 

X, Y 

3. Position and length of third 
segment of control field. 

X, Y 


Always. 

If two or three segments of 
control data. 

If three segments of control 
data. 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 




X 


The control data in each master record con be a single field of up to 30 characters or it can be 
broken into two or three subfields that total up to 30 characters. Regardless of the position of 
these fields in the data record, they are extracted and used as a single field. When tin or 
three segments ore defined, the second defined segment is placed to the right of the first, and 
the third to the right of the second. Each segment of the control data is defined by a parameter 
in the form: X, Y where: 

X = the low order (right hand) position of the segment within the data record, disregarding 
all appended fields. 

Y = the length of the segment. 


MASTBLOCK 
(cont.) 


1 . Sectors per block in master 
file: X 

2, Records per block in master 
file: Y 


Always 
Always 


X= 1-98 
Random: 
Y= 1-10 
Cont . Seq . 
Y= 1-10 (4K) 
Y= 1-30 (8K) 


X 
X 

1 


X 
X 

1 


X 

X 


X 
X 


X 
X 

1 


X 
X 

1 


X 

X 

"5 


X 

X, 

3 

1 


X 
X 

"§ 

s 


X 
X 

8 


X 
X 

1 


X 
X 

CM 

i 


X 

X 

-o 

§ 

8 


These entries always refer to the organized master or main file. 
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Operands 
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Parameter 
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Operand is Used in Generating 
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CM 




a 

1 


Q 

z 


2 

lU 

o 

z 

gt 


-J 
Q 




V 


o 
a 


-1 


Q 


a 

z 


MASTBLOCK 


3. Type of disk unit: 
UorOl 

4. Separate additions area: 

CSADAREA or 
NOCSADAREA 


Always 

Control sequential programs only. 
(Not checked by CSLOAD, but 
can be punched) . 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 
X 


X 

X 


X 
X 


X 
X 


If the organized file area is in 1311 disk storage, punch 1 1 . 
If the organized file area is in 1301 disk storage, punch 01. 

If separate additions area is used, punch CSADAREA. If no additions are made, or if all 
additions are higher in sequence and are made to the end of the file area, punch 
NOCSADAREA. 


MASTLIMITS 


1 . Lower limit of master file 
area. 

SSSSKO 

2. Upper limit of master file 
area. 

SSSSKO 


Always included for random 
programs . 




X 


X 


X 


X 


X 


X 


X 


X 












This must be the address of the first sector in the first track in the area. (K must be an even 
number, must be zero.) 

This must be the address of the firi t sector in the last track in the area . (K must be an even 
number, must be zero.) 


ADMESSING 


1. Converted addresses. 

DUPLICATE or 
UNIQUE 

2. Trailer files 

TRAILERS 
NOTRAILERS 


Always included for random 
programs . 




X 


X 


X 


X 


X 


X 


X 


X 












If chained file is used to accomodate duplicate converted addresses, punch DUPLICATE. 
If there ore no duplicate addresses, punch UNIQUE. 

If trailer records ore used, punch TRAILERS; if not, punch NOTRAILERS. 


TRAILENGTH 


1 . Length of input trailer 
records. 

X 

2. Tomiinal record marks on 
input trailer record. 

RMIN or 
NORMIN 


Included for all random programs 
that process trailer records. 


X= 20-9793 








X 
X 


X 
X 


X 
X 


X 
X 


X 
X 












X equals the actual length of the input trailer records as read by the program being generated. 
It includes all appended fields present In the input but not those added by the program. When 
loading a reorganized file, it equals the length of the output trailer records produced by 
RNUNLD. (This value appears In the assembly listing of RNUNLD in a field labeled OUTL.) 
The delete programs and RNUNLD use the organized trailer file as input. Therefore, X for 
these programs is the length of the trailer records in the organized file. (This value appears 
In the assembly listing of TRADD in a field labeled TRLLTH. 

If input trailer records have terminal record marks, punch RMIN; if not, punch NORMIN. 


TRAILCNTRL 


1 . Position of fint segment of 
major control field in 
trailen. 

X 

2. Position of second segment 
of major control field in 
trailers. 

X 

3. Position of third segment of 
major control field in 

trai lers . 
X 


Always. 

If two or three segments of 
control data. 

If three segments of control data . 


X= 1-9793 








X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 


X 

X 
X 












All trailer records must contain the some control data as their associated master records. The 
control data need not be in the same positions within the record, but it must be defined in the 
same sequence as it was in the MASTCONTRL cord. 

The operands in the TRAILCNTRL card give only the low-order position of each master- 
control-data segment within the trailer record. 


MINORCNTRL 


1 . Position and length of minor 
control field in trailers. 
X, Y 


Used for TRDEL only. 


X= 1-9793 
Y= 1-30 














X 














X = the low-order (right-hand) position of the minor control field within the trailer record, 
disregarding the trailer address field. 
Y = the length of the minor control field . 


TRAILBLOCK 


1 . Sectors and records per 
block in trailer file. 
X, Y 


Included for all programs 
that process trailer records. 


X= 1-98 
Y=l-10 








X 


X 


X 


X 


X 












These entries apply to the organized trailer file. Neither the block length nor the blocking 
factor need be the same as in the master file. 


COLLATE 


1. Collating sequence 
ASCENDING or 
DECENDING 


CSLOAD, CSADD, CSDELl 




















X 


X 


X 






Collating sequence of the control sequential file. 



n 



o 



Si 



DISTENTRY 


1 . Frequency of distribution 
index entries . 
Xor 
CYLINDER 


Required for CSLOAD . Used for 
CSUNLD only if reorganized 
output . 


X= 1-999998 




~ 














X 


r- 




r- 


X 


An entry is mode to the distribution index once every X records or once every cylinder. 


LOADAUDIT 


1. Audit trail print-out. 
PRINT or 
NOPRINT 


This card is optional 




X 


X 


X 




X 


X 






X 


X 






X 


Specify whether the loading and additions programs are to print the control data of each record 
OS it is loaded, along with the actual disk address where loaded. Use also with CSUNLD if 
reorganizing. If this card is used with RNDELl and RNDEL2, the control data and new disk 
address are printed for each record displaced by a deletion. RNADD also prints the control 
data and new disk address of any records displaced by an addition. 


NONHOMES 


1 . Nonhome record output . 

RECINWORK 

ADDINWORK 

RECONTAPE 

RECINCARD 

lADDINCARD 

5ADDINCARD 

PUNCH ZONE 

2. Type of punch unit. 

PARALLEL or 
blank 


PASSl and PASS2 only. 

Use only with 1440 package. 




X 
X 


X 
X 
























See PASSl for a description of the nonhome output options. 

Note. Use PUNCHZONE only if punch unit is o 1442 card read-punch. Model 1 or 2. 
Use RECINCARD only if punching on a 1402 or 1444. 

If using 1444 card punch for RECINCARD or xADDINCARD, punch PARALLEL. Otherwise, 
leave blank. 


TYPEDELETE 


1 . Type of delete program . 

DELETE or 
TAG 

2 . Aud it of de leted or tagged 
records. 

PRINT or 
NOPRINT 


All delete programs. 












X 
X 


X 
X 


X 
X 








X 
X 


X 
X 




If the generated program is to delete records, punch DELETE. If the program is to tog records, 
punch TAG. When generating RNDEL2, TRDEL, and CSDEL2, always punch DELETE. 

If the entry is PRINT, the entire deleted or tagged record is printed out. If no printing is 
wanted, enter NOPRINT. 


TYPERNUNLD 


1. File to be unloaded. 

MASTER or 
TRAILER 

2. Records to be unloaded. 

ACTIVE or 
TAGGED or 
BOTH 


RNUNLD always. PASSl, TRADD 
ond PASS2 if reorganizing. 




X 

X 
X 

X 


X 

X 
X 

X 




X 
X 








X 

X 
X 

X 












If the program is generated to unload a master file, punch MASTER; if generated to unload a 
trailer file, punch TRAILER. 

This parameter tells whether only the active, only the tagged, or both active and tagged records 
are to be unloaded. If there are no tagged records in the file, punch BOTH. 

If the converted disk addresses are to be appended to the front of output master records, punch 
CONADD; If not, punch NOCONADD. 

If the trailer-address fields ore to be retained on the front of output master records, punch 
TRAIL; If not, punch NOTRAIL. 


3. Converted address with 
output . 

CONADD or 
NOCONADD 

4. Trailer addresses withoutput, 

TRAIL or 
NOTRAIL 


Use only when unloading master 
records . 


TYPECSUNLD 


1 . Records to be unloaded. 

ACTIVE or 
TAGGED or 
BOTH 

2. Sequence link with output. 

LINK or 
NOLINK 


Always used for CSUNLD . Used 
for CSLOAD only if reloading 
output of CSUNLD. 




















X 

X 








X 

X 
X 


This parameter tells whether only the active, only the tagged, or both active and tagged 
records ore to be unloaded. If there are no tagged records in the file, punch BOTH. 

If tlie file is to be reorganized with the sequence-link field blanked but retained, and the 
distribution index rebuilt, punch LINK. If the file is to merged and written with the sequence- 
link field stripped, punch NOLINK 

If a two-pass program is to be generated, punch 2PASS. (If this entry Is used, LINK must be 
used also.) If generating a program to produce a relocated merge or a stripped merge, leave 
blank . 


3 . Type of unload program . 
2PASS or 
blank 


Used for two-pass unload only. 


UNLDMEDIA 
(cont.) 


1 . Unload media. 

CARD or 
DISK or 
TAPE 

2 . D isk output bl ock ing . 

X, Y 


Always used for RNUNLD and 
CSUNLD. 

Disk output only. 


X= 1-98 
Y= 1-70 


1 


1 


, 


1 


1 


i 


1 


X 

E 


1 

8 


^ 


"5 

"3 


i 


X 

TJ 

1 

s 


X = sectors per output block . 
Y = records per output block . 
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Explanation 


U1 

in 


CM 
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Q 
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2 
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a 


3 

z 
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UNLDMEDIA 


3. Tape output blocking , 

Y 

4. Type of punch unit, 

PARALLEL or 
blank 

5. Type of disk unit, 

n or 
01 

6. Tape labels. 

NOUBELS 
NONSTANDARD 
STANDARD, A 
STANDARD, B 
STAND ARD,C 


Tape output only. 

Used only with 1440 package. 

Disk output only. 
Tape output only. 


Y= 1-70 
















X 
X 

X 
X 










X 

X 

X 
X 


Y = records per output block . 

If using a 1444 card punch for card output, punch PARALLEL; otherwise, leave blank. 

If disk output on 1311 disk storage, punch 1 1 . 
If disk output on 1301 disk storage, punchOl . 

If the output tape is to be written with: 

a. No labels, punch NOLABEL. 

b. Nonstandard labels, punch NONSTANDARD. 

c. Standard, 120-character labels, punch STANDARD, A. 

d. Standard, 80-character labels, punch STANDARD, B. 

e. Standard, 84-character labels, punch STANDARD, C. 


INLABELS 


1 . Extent of label checking on 
disk input. 
NOHEADER or 
PRTHEADER or 
CHK HEADER 


If disk input (1311 and 1301). 
Note: Organized file area is 
considered input to delete and 
unload programs. 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


If 1311 disk input has no header labels, or if 1301 input, punch NOHEADER 
If input disk header labels are to be checked: 

Q. On file identification field only, punch PRTHEADER. 

b. In their entirety, punch CHKHEADER. 


OUTLABELS 


1 . Output disk header labels. 

NOHEADER or 
HEADER 

2. Extent of label checking on 
subsequent runs against 
organized file. 

IDE NT or 
ALL 


If disk output (1311 and 1301), 

All load and additions programs, 
only if HEADER punched as 
first parameter. 




X 
X 


X 
X 


X 
X 


X 
X 








X 


X 
X 


X 
X 






X 


If header labels are to be written for 131 1 disk output files, punch HEADER. 
If 1301 output, or if no labels on 131 1 output, punch NOHEADER. 

If header labels are written for the organized-file areas, this parameter specifies the extent of 
label checking to be performed during subsequent runs. The parameter is not required for 
RNUNLD or CSUNLD but can be included. 



Random File Example 



The format of the file used throughout this example 
is shown in Figure 18. It is a hypothetical file, with 
many features included for the purpose of example. 
In order to make the example more meaningful, let us 
discuss the purpose of the file and the operations that 
are to be performed. 

The file is conceived as an accounts-receivable file. 
It consists of a master file of customer accounts and a 
trailer file containing all transactions. The transactions 
are loaded as they occur, and the master records are 
updated semimonthly during a billing run. Again, it 
should be emphasized that this file has features in- 
cluded for the purpose of example and that it is cer- 
tainly not recommended as the best way to organize 
typical accounts-receivable files. In the first place, it 
is more likely that the master records be updated daily, 
rather than loading the transactions separately as 
trailer records. However, the master-trailer approach 
can be useful in applications where the trailer file 
alone is to be used as input to programs that process 
information about the sales without regard to the 
specific customer accounts. For example, a program 
might process the trailer file (without looking at the 
master file) to compute sales commissions. If the trailer 
records included details about the specific items pur- 
chased, the trailer file could be processed by programs 
that assist in merchandise management. 

In the sample file, there is a master record for each 
customer account. This master record contains the ac- 
count number, the customer name and address (used 
in billing), and such current information as: 

1. beginning balance 

2. ending balance 

3. credit limit 

4. average number of purchases for a given period 
of time 

5. total purchases for the life of the account 

6. standard discount rate 

The beginning and ending balances are aged, show- 
ing the amounts of the balance that is over 30 days 
old, over 60, and over 90. 



All transactions against the file are entered as trailer 
records. These transactions include: 

1. purchases 

2. return of goods 

3. payments 



The three kinds of transactions can be entered from 
the same form. In fact, a single trailer record can in- 
clude all three kinds. 

Periodically, the file is processed by a billing pro- 
gram. This program processes those records called for 
in a processing-order file (FOR). The FOR contains the 
control fields of all of those records that are to be 
billed at a certain time of the month. The program 
reads the master record and then follows the trailer 
chain (if any) and updates all applicable fields in the 
master record. The bill is then printed out. As each 
trailer record is processed, it is tagged in the same way 
as RNDELl tags records (A- and B-bits over the 
sixth position of the trailer-address field appended to 
the trailer record). In order to repack the trailer area, 
doing away with those records that have been proc- 
essed, RNUNLD is used to unload all trailer records 
that are not tagged. These trailers are then reloaded 
with a version of TRADD that is generated to load a 
reorganized file. 



Note. The systemspec and diskdrives cards describe the 
system on which the programs are to be run and the procedure 
to follow in the event of a tape-read error. These are factors 
that normally do not change from one program to the next. 
These cards can be the same for all programs even though a 
particular parameter is sometimes not needed. In Figure 19 for 
example, the ALTTAPE and ERRORSCAN operands are 
punched although there is no tape input or output in PASSl. 
These parameters are required for the tape output and input 
assumed for the reorganizing programs, however, and the pro- 
grammer may wish to use the same card in all programs. 

The same is true for the diskdhives card: it is suggested 
that this card contain the control numbers of all disk units in 
the system regardless of the specific imits used by a particular 
program. Once a program is generated, the specific units used 
are specified at object time in rdlin cards. 
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INPUT MASTER RECORD 








Customer 
Name 


Address 


1 
Account 

Number 


130 1 


1 24 


25 


51 


52-57 


131 



INPUT MASTER BLOCK 



1st Record 



2nd Record 



3rd Record 



^ 



1st Sector 
OUTPUT MASTER RECORD 



1 2nd Sector 



1 3rd Sector 



1 4th Sector 



7 Blanks 



Trailer Customer 
Address Name 



Address 



1 7|8 31 32 

OUTPUT MASTER BLOCK 



58 



Account 
Number 



137 



Ovflo 
Addr. 



59-64 



138 144 N45 



1st Record 



2nd Record 



1st Sector 



2nd Sector 



3rd Sector 



■—10 Blanks 



INPUT TRAILER RECORD 












v 








\ 






^ 














E 












s 


3 

z 




First 18 






Date 


E 


u 


Account 


Positions of 


Invoice 




Z 


<0 


Number 


Customer 


Numbe 






c 
o 


ST 




Name 








H 


to 












s; 


-a 


























o 


o 












CO 


U 










1 6 


7-8 




11 16 


17 34 


35 39 


40 80 



9-10 
OUTPUT TRAILER RECORD 



Trailer 
Address 


Account 
Number 


First 18 Positions 
of Customer Name 


Invoice 
Number 


' 21 blanks 


1 


8 


14 


32 37 


1—78 



Figure 18. Record Formats in Sample File 
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IBM 

Program 



>Q^<rc / 



Form X24-13S0 
Printed in U.S.A. 



INTERNATIONAl BUSINESS MACHINES CORPORATION 



Identification i_ 



Programmed by 

Dote 




AUTOCODER CODING SHEET 

IBM 1401-1410-1440-1460 
















1 


*age 


No 


76 

.t 1 ] of 
1 2 






)0 


Line 

J 5 


Label 

6 15 


Operation 

16 20 


OPERAND 

tl 25 30 35 40 45 50 55 60 65 70 


0,1, 


1 


F./.L.£ 




0.2 


e.a.i/.T.i.jv\£. , , 






/>A.S.S.J 














































0,3. 


1 

^.V,S.T.£M\S.F.£ C 






D.I .a.K.c.-r. ,.c.t.u.o.ii,i 


fi 


r-. , ■ 5 T 


A.c.ie.., 


U.A.A.L.-r 


T4 


''iS 


|S 


K,K 


0,K..S 


t 


^ 


(1/ 






















0,4 


D./.s.i'.ti.fi\i .if.e.i 






O. JL, ,V. ,?, .0, , . , 
















































0,S, 


T.'^.P.E.j.mp.if.r. 






*',£.»', 












1 




































0.6, 


/.U.P.U.T.Ui£.D.I .A 






P.I .i.ii^...y.,.j,, .1,1. . 
















































0.7. 


l.»>.PMA.^\T.!L.E.x. 






t .3. J. J .K,M.l,u. yt.M.a,* 


T 














































o.e, 


U.A.ST. C.OM.T.K..I. 






S.7.yL..^.l .t.^.l.X. . . 
















































0,9. 


1 

d.o.o,a..f.,<\s ./ .j/.n 






D.fj.p.L./,ei.i.,r .F.j.T',B..A 


1 


l,,E,D,< 












































• ,o. 


M.A.i.T.g.L\a,e..i!. 






y,.2., .0.1 
















































1,1, 
1.2, 


V.A.S.r.L,./)ui.i js 






d.t,0.1.0.a.yO.V.9.t.t.O 
















































L.d.A.b.A.u\b.l .T. 






PH. 1. tin-. 
















































',3, 


t/.OMsU.d^uiES, . 






S.A.PD.I.At.C.A.R'D^ • • 
















































1,4, 


l.U.l.,As(l.E\L.^. , 






CJ4.K.U.EJiJ>.E.It. , , , 
















































1.5, 


O.Urr.i.A£\E.L.s. 






A/.6.^.EA.D.E.e 
















































1,6, 


¥.,.,. 'r..o.i/.k 


f./g..<./ 





j^f, ./^.a,a.rjA^'^' .Fo,i 


L 


a.u.s. 


lM£i£i£. 


J, ,T,|«,F 


i/. 


FxKl 


D 




UA 


e,f?, 




























I.T, 


1 . , . 1 1 , 1 1 










1 , 1 








1 




L_j 








1 1 




L_j 




1_J 


1 — 1 


1 






1 1 




1_ 



Figure 19. Parameter Cards for Sample PASSl Program 



Load and Additions Programs 

PASSl 

Figure 19 shows the parameter cards used to generate 
the PASSl object program for the sample file shown 
in Figure 18. 



Input File 

TYPEINPUT — This program is to perform the initial 
loading of the file. If a program is generated to re- 
organize the file after using RNUNLD, all of the cards 
that define the input would be changed except the 
MASTCONTRL. and ADDRESSING cards. 

INPUTMEDIA - Input is from 1311 disk storage. 
There are three data records per 4-sector input block. 

'Note: Assume that the disk input file was produced as the 
output of a sort program. As was mentioned, the master records 
include a field that shows the average number of purchases in 
a given period of time. The file could be sorted on this field, 
thus placing the most active records first in the file. This as- 
sures their being loaded in a home-record location or in a 
prime position in a chain. 

mPMASTREC - The input records are 131 characters 
long, including a terminal record mark after each rec- 
ord. This card also specifies that the output records 
are to be followed by terminal record marks. These 



output record marks are placed after the overflow- 
address field. 

Note: If it were desired to leave the record mark at the end 
of the output data record and before the overflow-address field, 
the operands would be: NORMIN, NORMOUT. 

These programs would then treat die record mark as 
simply the last character of the data record. 

MASTCONTRL - In a file of this kind, a good distri- 
bution of disk addresses can usually be obtained from 
the account number alone. In this example, however, 
the first 18 positions of the customer name are used 
along with the accoxmt number. This might be desir- 
able if it were found that certain groupings or patterns 
in the account numbers show up in the disk addresses. 
Note that the positions of these two subfields are al- 
ways defined relative to the first position of the data 
record, disregarding fields appended to the front of 
the disk record by the load or unload programs. 

ADDRESSING - The control fields and conversion 
routine used can produce duplicate disk addresses. 
Trailer records are to be linked to the masters. 



Output File 

MASTBLOCK - The output file is to be written in 
1301 disk storage. Two master records can be written 
in each 3-sector output block. 
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MASTLIMITS - One fourth of the first 1301 module 
is to be used for the master file. The first five tracks 
are reserved as work tracks. 

LOAD AUDIT - The control data of each record is to 
be printed as it is loaded, along with the actual disk 
address of the record. 

NONHOMES — When a non-home record is encoun- 
tered, its converted disk address and its input disk 
address are to be punched. Five sets of these ad- 
dresses are punched in each card. 

Disk Labels 

INLABELS — The disk input file has header labels. 
This program is to check the file-identification field 
in these labels. 

OUTL ABELS - Because the output file is in 1301 
disk storage, there is no possibility of output header 
labels. However, the outlabels card is required with 
the entry NO HEADER. 



Conversion Routine 

Figure 20 shows a conversion routine for the sample 
file. This symboHc routine is placed after the param- 
eter cards for all of the programs except PASS2. 

Note. The routine would be used for PASS2 also, if the non- 
homes card had the operand PUNCHZONE. It would not be 
used for RNUNLD if the typernunld card did not include the 
operand CONADD. 

The routine converts the customer name and customer 
number fields in the master and trailer records to valid 
disk addresses. 



PASS2 

The same cards used for PASSl are used to generate 
the PASS2 load program. The operand of the routine 
card is changed to PASS2, and all of the other cards 
remain the same. 

Note. If the RECONTAPE option had been used in the non- 
homes card for PASSl, the iNPtrrMEDiA card wotild have to 
be changed for PASS2. (See Figure 16.) 



Program CPN^d^/^^/ ROLTlfi/E 

Programmed by 

Date 



Form X24. 
Printed in 



1350 
U.S>. 



INTERNATIONAL BUSINESS MACHINES CORPORATION 

AUTOCODER CODING SHEET 

IBM 1401-1410-1440-1460 



IdentificaHon C.AJ./?.a. O. 
76 80 

Page No.l_i_l of 



Line 

5 S 


Label 

6 IS 


Operation 

16 20 


OPERAND 

21 ZS 30 35 40 45 50 55 60 65 70 


0,1, 


C.O.U.lLd./n , , 


ZA. . 
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0,2 
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0,3, 
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P.I.E./..J>. 




0.4, 










A, , , 




c,a.A/,T.l>. -.1.9. ^ .c.a.M V, I 
















0,5, 










B.ff. E, 




Z.Z. p.ti.T.o. , ,c,o,M,va.yi 










M.A.K.E 


■ 7,T,tf, ,i),/,/!,/,-r, .(,«,f,c, ,P,o,S.)> .0, OJl. 


/, 


0.6, 










M.L.S, 
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OJ, 










M. . , 




Z..Z.U.PI.M 
















0.8, 


Z.Z.P.J/,r.fll 








M.L.C. 
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0.9. 
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ff, , , 
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z,z,<f,i,,.c.o,v,i/,i.-,i, , 
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2,1, 
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2,2, 
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.1,S,T> ,0,/ ,<l,/ ,7-, .^, , , 




2,9, 


R.S.T.u.1. 1 








3, , , 




SiT,4,ff,T-J 
















2,4. 


Z.Z.T.E,£.tI 








P.CJU. 




#^ 
















2,5. 
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1 


A,<,y 


Z.Z.K.l, . ! 
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/ 
















?7, 
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'>&M/, 




















?,», 
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t?lLM 
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EM.ft. 
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; 






















1 , , , 


,,,,,,,,,, 





Figure 20. Conversion Routine for Sample File 
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Figure 21. Parameter Cards for Sample RNADD Program 



Account 
Number 



1 2 



(Lost 79 Positions of Record) 
Included in Output Master Record - 



Account 
Number 



80 



Customer Name 



Address 



33 34 



58 



Credit 
Information 



59 



Dote 

Account 

Opened 



68 69 



Type of 
Account 



74 75 



80 



-Included in Output Master Record- 
(First 51 Positions of Record) 



Figure 22. Input to Sample RNADD Program 



51 



RNADD 

Figure 21 shows the parameter cards used to generate 
the RNADD additions program. The following cards 
are exactly the same as for PASSl. 



SYSTEMSPEC 

DISKDRIVES 

ADDRESSING 



MASTCONTRL 

MASTBLOCK 

MASTLIMITS 



Input File 

INPUTMEDIA — Input to the load programs was 
from disk storage. Card input is assumed for the addi- 
tions program. The format of this input is shown in 
Figure 22. Because the format is not that required for 
automatic entry of the input records, the operand 
indicates that a symbolic record-assembly routine is 
furnished with the source deck. 

INPMASTREC - The assembled input data records 
are 130 characters long. There are no terminal record 
marks on input, but they must be appended to tiie 
output records, because they were during the initial 
loading of the file. 



User's Subroutines 

The assembly routine (Figure 23) extracts certain fields 
from the input cards and places these in the input 
record area. Two of these fields are also moved to the 
print area, along with other information that is present 
in the input but that is not included in the output 
master records. The assembly routine then branches 
back to the main program. 

After processing the records, the program branches 
to an EXIT2 routine (Figure 24). This routine checks 
to see whether the record was written in a home or 
non-home position. If written as a home record, the 
disk address produced by the conversion routine is 
the actual address used to write the record. This ad- 
dress is moved to the print area. If the record is writ- 
ten as a non-home, the routine moves both the 
converted disk address (CONVl) and the actual disk 
address (WORKN) to the print area. The audit trail 
is then printed. 

At end of job, the RNADD program prints a message 
giving the total number of records added. However, 
no separate count is given for home and non-home rec- 
ords. This distinction is automatically made by PASSl. 
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T3..S^.fg4i:n 






UJ 'c 




ff,C,j,(?,F.^-^.fJD. . . 






4Jl.fl.ir.E. .IM.P.O. .Fji.IL Mfi.<.T.E.p.. .tl.eC£XQ.D. . 












2.0, 








iMr. 






















2.1, 








Mi.r. 






















2.2. 








9ittf[ 




Z.2..SJU. ,.,,,,, 






,T,i>,PM, .^Ml.T.CU. .OM. , , 












2.3. 








B, . 




p,ti.a,c^.<: . . . . , 


















2.4. 


Z.2.S Ml . 1 






p.cfi/ . 


1 


















2.5. 















Figure 23. Assembly Routine for Sample File 
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IBM 

Program ^yiT ^ ff/t^ i4^/T3 

Programmed by 

Date 



Form X24-13S0 
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rNTERNATIONAl BUSINESS MACHINES CORPORATION 

AUTOCODER CODING SHEET 

IBM 1401-1410-1440-1460 



Identification ■ ■ ■ 

76 

Page No.U-l of 
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Line 

5 5 


Label 

6 15 


Operatior 

6 20 


OPERAND 

21 25 so 35 40 45 SO 55 60 65 70 


0, 1, 


^x.i rr.i. I , , 


M±Ji/,S. 


i/^.a.p.ii.*/.j .zzjijf.D.ff. 


, , Mo.i/.£. .4.^..TV.A.L. A 0,0.1?. i/.<:.f.a .-no. .fl/je./.Tf. 


0.2 






M.L.Af.<. 




, , ^.E^/i,e.fy ,r,rf, ,F,i E.L,D, .FJ>.p. .C0MP.A.ILF. , , . , 


0,3 






M.i.A/S. 






0,4. 






M.iJV.<. 








0,5, 






\A.LM,< . 








0.6, 






UI.lMS. 








0,7, 






MluilS^ 








o,a. 






c. . . . 


7,ZA.O.D.D.,.C.0M.V.l 


, , ^./)JAf>.A.flF. ACT.\J.AL. Ji.ODp. .77^, y..a.A/.u.F.ff.T.P.p 


0,9, 






fi£. . . 


z.z.c.aMir 


, . J.p.b.2., .-, ,/„fi .Ma,T. ,E.gMJi.L,y .P.aj^^.r. .ff,arr,(J. 


1 






l4. , , , 


Z.7.ll.t,j.Z.Z,U.f>,A/.U 


,4. flD, .0M,£, ,7-./*, AI.0.UM./>M£. C.»,u,AJr. 


1,1, 






Ml.^. . 


Z.Zjt^.0.p. j.P.P./.AAT;-f.J.J.o. . 






',2. 


T.T.£.,aMv\ 




lUl.C. , 


C.a.A/M.l. ^.P,e,i .A/.-r-i;i.i .a , , 






■ 3, 






If , , , , 


P,J2.I .i(.T 


, , .P.P.IMT. A.O.p.l.T. .7^ejX.I.L. 


,11/./. 7-./^ ■i4/-.T.//.A/_. . . 


■ ,4, 






a<c,^, . 


zx,o,y,F.j., . . , . 


. . .AMdJs^jl. ,c,0,*f,if,£,e.rr,E.i>. 


APXf.^.£,<,S.£^ 


1, 5, 






ff, , , , 


£.U.T.P.Y.2. 






< ,6. 


Z.7..A.{^.rj-\ 




C£, , , 


i 






1.7. 






0. . , . 


£.«.T,e,/.2 







1,8, 


E.Y.I .711. 1 




c.s. . , 


T,a/ , . 


, , .C.L.£A,IZ ,Pfi./^A7-; ,£.D.ft^. 




1,9. 






C.S , . 








2,0, 






Af.LC. , 


Zl^^XjIAj.PiP/ Mr^,7S-i , , 


. , J^,d,lf>E, .£4,7, JH&S^'AA.e. 


t:o, »Pfl.f A/rr* 4J?.k,jl . 








UA.^. , 


7:z.lJa¥.U.,,PA.iMrrA^Ag: , , 






2,2. 






u/. , , . 


P.PJJUT^ 






2,3, 






, , .2 




. . .Ea.T , , , , . , 




2,4, 


TT.A.D.D.l^i 




cy,cu/ . 


f.7. 






2.5, 


Z2X.L . 1 




PtJUA 








u. 


ZZ/K^X^^I 




^.LM. , 


aaoatxa 






1,7 


Z.Z'£d-TjJL 




^C^l ■ 


S^MiiMU'A MKf ^ 






















_, — 1 — 1 — \ — 1 — L_ 




, , , , 







,,.,,,,. 



Figure 24. Exit Routines for Sample File 
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Program TfJAPD 



Form X24-1350 
Printad in U.S.A. 



Programmed by- 
Dote 



INTERNATIONAL lUSINESS AHACHINES CORPORATION 

AUTOCODER CODING SHEET 

IBM 1401-1410-1440-1460 



Identification u-i i 
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Page No.Lj— I of 
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Line 
s s 


Label 

6 15 


Operation 


OPERAND 

21 25 30 95 40 45 50 55 60 65 70 


0,1, 


1 



F,t 


Jl f. 




_ ,1 


0.2 


P.a./j.T/.^. . . 






fp4,D,D. 
































0,3. 


S.v.<;.-r.F.Mf./'.g.c. 






0./^.e.e^r:^ .c.aM.p.tt..i.u.-n^ .r,7-.^./r^ 




MfiA 


I 


T.r.A.P.e 


, £.PJ^Ji.PS.ti..A.I 


1/ 




















0.4. 


pj .i.u.p.dn.ir.e..i 






n.,.i.,.y...7.,.B. 










J 
























0,5, 


T:yjs>£. / .jAfijj.T-. 






V£.Uf 


































0.6, 


lJJ.PMrr.fi^.D,l 4 






"^.jey?.^./. ./?.v./>^..r.? 


































0,7. 


T.fL^.I .L.iu.6,T^ 






7^.^Ms.PMl.U 


































O.B. 


T.P.A,I.L.C\t^.TM.L 






£.2.^. 


































0,9, 


1 .U.PJJf.dStr,p,K.e. 






l.V.f.^,fiM.t,U,j.a,^A.U.T. 


































1.0, 


UI.A.i .T.r.ti\fLym.L 






f.7.j.^.^./.r,, ./.?. 


































' . ' . 


UJI.srr.L.Aui.-r.S 






O.0,0.1.0.f>.yO.<9J9.9A. , 


































1,2, 


14Ji.Srr.B.L!tAyL.ir. 






t...2...Ai 


































1,3, 


a.fi.PJP,£.^\c./ Ji/A 






0.£/,/>,i../.fi.Ar.>r;^.T.^.4/ .£.£/?.«•. . . 


































1,4, 


T.li.A,/,L.ftJ..A,C.M 








































1,5, 


omtiae'^ls. 






U,dM£A.I>£.f?. 


































1,6. 


1 








































1,T, 


If. . . .CXtM.I/,^.t 


Ti 


i.aM 


2.a.u.t:/.a/.s ~P.o±.L,aMS. .Ue.e.f., 


, T,U£.AJ 


,£.*/. A 


CAi?i/>, 






















1,8, 


1 

1 . . . 










1 1 1 1 1 




^ 




^ 






^ 






^ 





Figure 25. Parameter Cards for Sample TRADD Program 



S3 



In order to get this count, the EXIT2 routine adds 1 
to a counter each time a record is processed as a non- 
home. In order to print this total, EXITS is called for. 
The input file is followed by a card with ENDCD in 
columns 1-5. This card is then followed by one with 
BXXX in columns 1-4, where XXX is the actual ma- 
chine address of the first instruction in the EXITS rou- 
tine. This address can be found by looking up the 
label EXITS in the assembly listing. The EXITS rou- 
tine prints the total and halts. 

TRADD 

The transactions, or trailer records, are loaded into disk 
storage from cards. The input cards and the resulting 
output trailer records are shown in Figure 18. The 
parameter cards used to generate the TRADD pro- 
gram that loads the trailer records are shown in Figure 
25. This TRADD program is used each time new trailer 
records are to be loaded. In a file such as the one dis- 
cussed in this example, the transactions would probably 
be entered in the file daily. Another version of the 
TRADD program is generated to reload trailers un- 
loaded by RNUNLD (see Reorganization Programs). 
The following parameter cards in Figure 25 are 
exactly the same as for PASSl. 



SYSTEMSPEC 

DISKDRIVES 

TYPEINPirr 



ADDRESSING 

MASTCONTRL 

MASTBLOCK 



MASTLIMITS 
LOADAUOrr 



Input Trailer File 

INPUTMEDIA — Each input trailer record is con- 
tained in a single card. In the event of an error, the 



program is to print the control field of the record and 
bypass it. 

Note. Because these are single-card records, the only error in 
the input record format that could be detected would be a 
sequence number (columns 9-10) other than 01. 

TRAILENGTH - The input trailer records are 70 
positions long and do not include terminal record 
marks. 

TRAILCNTRL - The major control field used in the 
trailers is also used in the master records. However, 
the two subfields comprising it have been rearranged 
in the record and now appear in the order in which 
they are extracted for the conversion routine. 

Master File 

INPMASTREC — The organized master records are 

145 positions long, including terminal record marks. 

Output Trailer File 

TRAILBLOCK - The output trailer file is written 
one sector at a time, with one 78-character transaction 
in each sector. The remaining 22 positions are padded 
with blanks. 



Delete Programs 
RNDEL1 

The parameter cards required to generate a RNDELl 
program for the sample file are shown in Figure 26. The 
following cards are exactly the same as for TRADD: 



IBM 

Program 



)5M f>£ ^/. 



Form X24-1350 
Printed in U.S.A. 



INTERNATIONAL BUSINESS MACHINES CORPORATION 



Identification i 



Programmed by AUTOCODER CODING SHEET 

nnte IBM 1401-1410-1440-1460 


Page 


No 


76 

-Li 1 of 

1 2 


- 




90 


Line 
3 s 


Label 

6 IS 


Operation 
16 20 


OPERAND 

21 25 30 36 40 45 50 55 60 65 70 


0, 1, 


1 
1 , , . 


F.I.L.E. 




0,2 


Q.D,urri-M^. . . 




, 


JfH.D,^,LJ , 


















0,3 


5.Vur.T,pjifir,P,£/: 








D./ e.f/^^T' CO M^l^'f J(/.rr ysTA.r.n. j.M e,A,L,T.T.ji 


P,£,j ,E,R,2^a.t!LS.^JkM 
















0,4, 


D,i.<./^.D.fiii.ir.p<, 








o,,.z,,Y.,f?...S. ' ' 


















0,5, 


I M,p^.j(.%^j?.e/: 








l.v.r.^ .RM.IM , , , , , 




















o.e, 


MAS,r,c.oW.r.p.L 








r.r.^^.^.i^.j ,ir. 




















0,7, 


U.A.<::r.ti.il\d.c.J/. 








3. .Zy0.f 




















0,8, 


MAST.Lt'Al.irrS 








o'a/i'lO.Q.ya*/.9.9g.o 




















0,9, 


4,/>i7.p,A-.fl5",/yV/; 








D.u.P.L.i.r.A.rFy-rRJiJ l.ep:^ 




















1,0. 


T.£A.f./..FsV,&rru 








7y.ytiu/.Ai. 




















1,1, 


f:ff>.ja./.L.c^.T/^.L 








4.,J</. 




















1.2. 


r.p.4.1 L.i^LarA' 








/.;.! 




















1.5. 


rj^,ff,£l>,E\i..£rr.^ 








C>.F.i..e,T-,£.yP,flJ MT, , , , 




















1,4, 


LAA>DJxAo,irr, 








RPJMTT , 




















1,5, 


IMLA.ff.^^S , 








l\l.O.H.e.A.O.£.R 




















1.6, 


K. , C0JJ\U.£.I^S 


i ^O^H 




i 


.ir.TJ M.F, .P,0,L.l.a,ktS. M.E.2.Ey TTMFAA FMIi 


.CJ\p[> 


















1.7. 


1 

1 1 . 1 1 1 1 1 1 


— 1 1 — 1 


L^ 


\~ 










1 1 




^^ 


1 







Figure 26. Parameter Cards for Sample RNDELl Program 
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-Isf Record- 



-2ncl Record- 



- 3rd Record • 



Account 
Number 



First 18 Positions 
of Customer Name 



67 



Account 
Number 



24 25 



3031 



First 18 Positions 
of Customer Name 



Account 
Number 



48 49 



First 18 Positions 
of Customer Name 



54 55 



Unused 
Columns 



72 73 



80 



Figure 27. Input to RNDELl 



SYSTEMSPEC 
DISKDRIVES 
INPMASTREC 
MASTCONTKL 



MASTLIMITS 
MASTBLOCK 
ADDRESSING 



TRAILCNTRL 
TRAILBLOCK 
LOADAUDIT 



The TRAiLENGTH Card gives the length of the trailer 
records as they appear in the organized file. The 
TYPEDELETE Card spccifics that records (master and 
trailers) are to be deleted (instead of tagged) and that 
each record deleted is to be printed. The loadaudit 
card is included and specifies that the control data and 
new disk address be printed for each record displaced 
by a deletion. 

Note. The loadaxtoit card would not be used if TAG were 
punched in the typedelete card. 

The input to RNDELl is shown in Figure 27. Each 
card can contain the control data of one, two, or three 
records. 

RNDEL2 

If RNDELl were generated to tag records, a RNDEL2 
program would be needed to delete all tagged records. 
The parameter cards would be exactly tbe same as 
shown for RNDELl, except for the routine card. 
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?^/ ^/ ^ /L ^ ) 



Form X24-1350 
Printed in U.S.A. 



INTERNATIONAL BUSINESS MACHINES CORPORATION 



Identification i 



Programmed by AUTOCODER CODING SHEET 

n„t„ IBM 1401-1410-1440-1460 










'age 


No 


.Lj_I 

1 2 


re 

of 


- 


eo 


Line 

5 5 


Label 

6 15 


Operation 

16 20 


OPERAND 

21 25 30 35 40 45 50 55 60 65 70 


0.1, 


1 


Ed.L^ 




0.2 


QDM.r.f Af. , , 






PML/./ill./i, 





































0,3, 


<:.y.^-r.FMk<.p.Fc 






D.I iZFr^Tj ComPi^jajt: srrA 


C«\( 




AJ rr.TAJP.E. 




^.ep^i^SiCA^ 


























0,4, 


D.I.<.i'.O.dl.l/./-S 






^3..,2,,,f.,,?,,,5 ', , , 




































0,5, 


T,J?A.I ,t-,F\fj,c:rh 








7.^.y/PM/M , , , 






































0,6, 


rj?ji,( .L/l'\AJrr.e.,L 








^,..2,V 






































0,7, 


T.G/^.I .L.p\L.O,Ck 








I... I 






































o.e. 


) .U,P,fjljax\TJl££. 








/!^.s-.y1?Mrji/.yPMa,aT. . . . . 






































0,9, 


*tlJ4,-r,c.ov/,r,Pj. 








S7.j,i,yl,ii.y1<f, 






































>.o, 


«/.j.^,r:/f.z.lAc./b', 








3,yZ,yO,t 






































','l 


UASruyjAirs 








a/i.o:in.a.,./)M.9.9i^ 






































>,2, 


</.A/>,iP£-.<"lc,/,^,/i 








p,i/,P,L.i.r.M.T.s.^,Traa.i .i^^o.^., 






































',', 










7:a./i,/ j.,Aiz yA^^T''/ ,i^,£, . , . , 






































1,4, 


UMl,l>M,e\0/'^' 








r,A,P£,y1,C)i J S,T,aM,/>^./2,/>j ,/I, 






































1,5, 


lJif.LAlLf'\LS. , 






(iO,lt£A.O£.R, , . , 






































1,6. 


1 
— 1 — 1 — 1 — 1 — I 1 1 — 1 — 1— 


UlA^ 


1 


ij i7o f jZj 1 1 1 1 1 1 1 — 1 1 — 1 — 1 — 1 — 1 — 1 






1 1 — 1 — 1 — 1 1 1 — 1 


, 1 


_, 






, 


1 1 














1 


1 1 





Figure 28. Parameter Cards for Sample RNUNLD Program 



TRDEL 

To generate a TRDEL program for the sample file, 
we would change the routine card shown in Figure 26, 
supply a MiNORCNTRL Card, leave out the loadaudit 
card, and use all of the other cards exactly as they 
appear in Figure 26. The trailer records shown in 
Figure 18 have a field containing the invoice number 
in positions 35-39. This could be used as the minor 
control field. The minorcntrl card would be punched 
with the operands 39, 5. 



Reorganization Programs 

RNUNLD 

The assumption was made in the description of the 
sample file that a bilhng program tags trailer records 
when they are processed and are no longer required. 
The parameter cards shown in Figure 28 are used to 
generate a RNUNLD program that is used to unload 
the active, or not-tagged, trailers. The following cards 
are exactly the same as for RNDELl: 



SYSTEMSPEC 

DISKDRIVES 

TRADLENGTH 



TRAILCNTRl, 
TRAILBLOCK 
MASTCONTBL 



MASTBLOCK 
MASTLIMrrS 
ADDRESSING 



The iNPMASTREC Card includes the operand RMOUT, 
which specifies in this case that the output trailer rec- 
ords are to have terminal record marks. 

The TYPERNUNLD Card calls for active trailers to be 
unloaded. 



The UNLDMEDIA card specifies tape output, with 20 
records per tape block. The output tape is to be writ- 
ten with standard 120-character tape labels. 

TRADD (Reorganized) 

The unloaded, active trailer records can be reloaded 
with a TRADD program generated with the parameter 
cards shown in Figure 29. The following cards are the 
same as for the initial-loading version of TRADD: 



RoxrriNE 

SYSTEMSPEC 

DISKDBTVES 

TRAILCNTRL 



MASTLIMITS 
INPMASTREC 
MASTBLOCK 
MASTCONTRL 



ADDRESSING 
TRAILBLOCK 
LOADAUDIT 



The following cards are the same as for the 
RNUNLD program: 



TYPERNtJNLD 
UNLDMEDIA 



The TYPEiNPUT card specifies: 

1. tape input 

2. 20 records per tape block 

3. blanks padding out any unused record locations 

4. standard 120-character tape labels followed by tape 
marks 

5. that the tape header labels are to be checked on 
file identification field only. 

The TRADLENGTH Card gives the length of the input 
trailer records. These records were unloaded by 
RNUNLD with record marks at the end of the records 
and a blank position in front of each record. 
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0,5, 
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0,7, 


T.p,A.i.L,BAJ./irru 






7.Z yRM/M 






























0,8. 


T.D.A.II-.rj^.f.pL 






^■j rL^~ 






























0,9, 


/ MPM4.<:\r,e,E.c 






t.j^jr.j,tZAl./M. i.l2M/i.U,T' 






























1,0. 


UJ.i rrco^rrPL 
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', 1. 
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1,2, 


if.AS.r.ff./\flCjl^. 






^j .2.^0.1 




























1,3. 


4.D.0./Z£.skjM.£ 
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1.4. 
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1.5. 
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Figure 29. Parameter Cards for Sample TRADD Reorganize Program 
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Retrieval Routines 



The IBM disk-jBle organization routines do not include 
any retrieval routines. The Input/Output Control Sys- 
tem and the Report Program Generator can often be 
used to advantage on files organized by these routines. 
Both of these programming systems accommodate files 
organized by the random and the control-sequential 
routines. 

The block diagram shown in Figure 30 shows a 
method of retrieving records from a random file. 

Control-sequential files are normally processed se- 
quentially: a program simply reads the next consecu- 
tive disk location unless directed to an additions area 
by an address in the sequence-fink field. 

When it is desired to retrieve certain records from a 
control-sequential file without passing the entire file, a 
method such as that shown in Figure 31 can be used. 
The block diagram in Figure 31 uses a search method 
that is especially efficient in a large file if the entries in 
the distribution index represent a large range of disk 
storage. For example, if an entry were made to the 
index once for each cyhnder, this method is probably 
quicker than any other. However, if entries are made 
to the distribution index more often, it may be quicker 
to scan the records sequentially within the range until 
the desired record is found. Linkage need not be fol- 
lowed to the additions area unless the desired record 
is actually in that area. 
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Figure 31. Random Retrieval from a Control-Sequential File 
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